diff options
-rw-r--r-- | examples/simple.scm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/examples/simple.scm b/examples/simple.scm index c33b7a2..de66e6b 100644 --- a/examples/simple.scm +++ b/examples/simple.scm @@ -17,7 +17,7 @@ (draw-sprite (force sprite))) ;; Register callbacks. -(add-hook! on-quit-hook (lambda () (quit-demo))) +(add-hook! on-quit-hook quit-game-loop!) (add-hook! on-render-hook (lambda () (render))) (add-hook! on-key-down-hook (lambda (key mod unicode) (key-down key mod unicode))) |