From cf1fa9db1fbd45bdada16b0e888583e4a9ae118a Mon Sep 17 00:00:00 2001 From: David Thompson Date: Mon, 2 Sep 2013 09:08:42 -0400 Subject: Update simple demo to use a game object. --- examples/simple.scm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'examples/simple.scm') 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))) -- cgit v1.2.3