diff options
Diffstat (limited to 'examples/coroutine.scm')
-rw-r--r-- | examples/coroutine.scm | 4 |
1 files changed, 1 insertions, 3 deletions
diff --git a/examples/coroutine.scm b/examples/coroutine.scm index bb3f6ab..d2a53d3 100644 --- a/examples/coroutine.scm +++ b/examples/coroutine.scm @@ -6,8 +6,6 @@ (2d sprite) (2d game-loop) (2d window) - (2d vector) - (2d input) (2d helpers) (2d agenda) (2d coroutine)) @@ -19,7 +17,7 @@ (define sprite #f) (define (key-down key mod unicode) - (cond ((any-equal? key (keycode escape) (keycode q)) + (cond ((any-equal? key 'escape 'q) (close-window) (quit)))) |