diff options
| author | David Thompson <dthompson2@worcester.edu> | 2013-12-02 22:20:52 -0500 |
|---|---|---|
| committer | David Thompson <dthompson2@worcester.edu> | 2013-12-02 22:20:52 -0500 |
| commit | c437856348ea0628dda00bb961e1dee3a4d9d1fe (patch) | |
| tree | af7ada0656f7b3fa6d03fcd241d69a02e41e99ee | |
| parent | fc072b5cbd758e009f3333faa3e83068fd3cace3 (diff) | |
Use signal-receive! instead of signal-set! in signal-connect!
* 2d/signals.scm (signal-connect!): Use signal-receive!
| -rw-r--r-- | 2d/signals.scm | 2 |
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." |