summaryrefslogtreecommitdiff
path: root/chickadee.scm
diff options
context:
space:
mode:
Diffstat (limited to 'chickadee.scm')
-rw-r--r--chickadee.scm4
1 files changed, 2 insertions, 2 deletions
diff --git a/chickadee.scm b/chickadee.scm
index c8ad719..8dc0400 100644
--- a/chickadee.scm
+++ b/chickadee.scm
@@ -387,8 +387,8 @@ border is disabled, otherwise it is enabled.")
(with-projection (atomic-box-ref default-projection)
(draw alpha)))
(sdl2:swap-gl-window (unwrap-window window)))
- (define (on-error stack key args)
- (error stack key args)
+ (define (on-error e stack)
+ (error e stack)
;; Flush all input events that have occurred while in the error
;; state.
(while (poll-event) #t))