summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorDavid Thompson <dthompson2@worcester.edu>2013-12-02 22:20:52 -0500
committerDavid Thompson <dthompson2@worcester.edu>2013-12-02 22:20:52 -0500
commitc437856348ea0628dda00bb961e1dee3a4d9d1fe (patch)
treeaf7ada0656f7b3fa6d03fcd241d69a02e41e99ee
parentfc072b5cbd758e009f3333faa3e83068fd3cace3 (diff)
Use signal-receive! instead of signal-set! in signal-connect!
* 2d/signals.scm (signal-connect!): Use signal-receive!
-rw-r--r--2d/signals.scm2
1 files changed, 1 insertions, 1 deletions
diff --git a/2d/signals.scm b/2d/signals.scm
index 502aada..0219602 100644
--- a/2d/signals.scm
+++ b/2d/signals.scm
@@ -106,7 +106,7 @@ value will be propagated to LISTENER."
(%set-signal-connectors!
signal
(cons listener (signal-connectors signal)))
- (signal-set! listener (signal-ref signal)))
+ (signal-receive! listener (signal-ref signal) signal))
(define (signal-disconnect! signal listener)
"Detach LISTENER from SIGNAL."