diff options
Diffstat (limited to 'examples/simple.scm')
-rw-r--r-- | examples/simple.scm | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/examples/simple.scm b/examples/simple.scm index 09f9870..c55de6f 100644 --- a/examples/simple.scm +++ b/examples/simple.scm @@ -22,9 +22,9 @@ (draw-sprite sprite)) ;; Register callbacks. -(set-quit-callback (lambda () (quit))) -(set-render-callback (lambda () (render))) -(set-key-down-callback (lambda (key mod unicode) (key-down key mod unicode))) +(add-hook! on-quit-hook (lambda () (quit-demo))) +(add-hook! on-render-hook (lambda () (render))) +(add-hook! on-key-down-hook (lambda (key mod unicode) (key-down key mod unicode))) ;; Open the window. (open-window window-width window-height) |