diff options
Diffstat (limited to '2d/game.scm')
| -rw-r--r-- | 2d/game.scm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/2d/game.scm b/2d/game.scm index 3bd314e..7bb0823 100644 --- a/2d/game.scm +++ b/2d/game.scm @@ -35,10 +35,10 @@ ;; When no event callbacks are specified for a scene, these ;; (hopefully) convenient defaults will be used. (define %default-scene-events - `((quit . ,(lambda (state) (quit-game-loop!))) + `((quit . ,(lambda (state) (quit-game))) (key-down . ,(lambda (state key mode unicode) (when (any-equal? key 'escape 'q) - (quit-game-loop!)))))) + (quit-game)))))) (define (default-scene-events) (copy-tree %default-scene-events)) |