summaryrefslogtreecommitdiff
path: root/lisparuga.scm
diff options
context:
space:
mode:
Diffstat (limited to 'lisparuga.scm')
-rw-r--r--lisparuga.scm1
1 files changed, 1 insertions, 0 deletions
diff --git a/lisparuga.scm b/lisparuga.scm
index e5fb888..06949cc 100644
--- a/lisparuga.scm
+++ b/lisparuga.scm
@@ -83,6 +83,7 @@
(start-stage (& lisparuga game)))
(define-method (game-over-transition (lisparuga <lisparuga>))
+ (stop-stage (& lisparuga game))
(set! (state lisparuga) 'game-over)
(let ((game-over (make <node-2d>
#:name 'game-over