Fix another overlooked use of <spawn>

2016-06-14 03:21:23 -04:00 · 2016-06-14 03:21:23 -04:00 · 0b2d80a997
parent 9b2ce64300
commit 0b2d80a997
1 changed files with 2 additions and 1 deletions
--- a/examples/platformer/main.rkt
+++ b/examples/platformer/main.rkt
@ -920,7 +920,8 @@
 (define (spawn-standalone-assertions . patches)
  (<spawn> (lambda ()
             (list (lambda (e s) #f)
-                   (transition (void) (patch-seq* patches))))))
+                   (transition (void) (patch-seq* patches))
+                   #f))))

 (define (spawn-background-image level-size scene)
  (match-define (vector level-width level-height) level-size)