summaryrefslogtreecommitdiff
path: root/2d
diff options
context:
space:
mode:
Diffstat (limited to '2d')
-rw-r--r--2d/game.scm2
1 files changed, 1 insertions, 1 deletions
diff --git a/2d/game.scm b/2d/game.scm
index b2dc0a7..b3f57ac 100644
--- a/2d/game.scm
+++ b/2d/game.scm
@@ -163,4 +163,4 @@ milliseconds of the last iteration of the loop."
"Run the relevant hook for the event E."
(let ((handle (hashq-get-handle event-handlers (SDL:event:type e))))
(when handle
- ((car handle) e))))
+ ((cdr handle) e))))