summaryrefslogtreecommitdiff
path: root/examples/path.scm
diff options
context:
space:
mode:
Diffstat (limited to 'examples/path.scm')
-rw-r--r--examples/path.scm5
1 files changed, 5 insertions, 0 deletions
diff --git a/examples/path.scm b/examples/path.scm
index 7bad91b..aabfb4d 100644
--- a/examples/path.scm
+++ b/examples/path.scm
@@ -74,7 +74,12 @@
(define (update dt)
(update-agenda 1))
+(define (key-press key modifiers repeat?)
+ (case key
+ ((q) (abort-game))))
+
(run-game #:window-title "Vector paths"
#:load load
#:draw draw
+ #:key-press key-press
#:update update)