summaryrefslogtreecommitdiff
path: root/2d/signals.scm
diff options
context:
space:
mode:
Diffstat (limited to '2d/signals.scm')
-rw-r--r--2d/signals.scm3
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