diff options
| -rw-r--r-- | chickadee.scm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/chickadee.scm b/chickadee.scm index e604113..512aa4a 100644 --- a/chickadee.scm +++ b/chickadee.scm @@ -66,7 +66,7 @@ (define controller-press-hook (make-hook 2)) (define controller-release-hook (make-hook 2)) (define controller-move-hook (make-hook 3)) -(define error-hook (make-hook 1)) +(define error-hook (make-hook 3)) (define open-controller (@@ (chickadee input controller) open-controller)) (define close-controller (@@ (chickadee input controller) close-controller)) @@ -91,7 +91,7 @@ (apply throw key args) (begin (display-game-loop-error stack key args) - (run-hook error-hook stack)))) + (run-hook error-hook stack key args)))) (lambda (key . args) (set! stack (make-stack #t 3)))))) |