diff options
| -rw-r--r-- | 2d/signals.scm | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/2d/signals.scm b/2d/signals.scm index 84641a7..a0518f8 100644 --- a/2d/signals.scm +++ b/2d/signals.scm @@ -159,7 +159,8 @@ a side-effect into a signal chain." (lambda (do-signal from) (let ((value (signal-ref signal))) (proc value) - value)))) + value)) + signal)) (define (signal-map proc signal . signals) "Create a new signal that applies PROC to the values stored in one |