diff options
| -rw-r--r-- | examples/common.scm | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/examples/common.scm b/examples/common.scm index 15bc53b..0c380f2 100644 --- a/examples/common.scm +++ b/examples/common.scm @@ -1,4 +1,6 @@ (use-modules (2d keyboard) + (2d game) + (2d window) (2d repl server)) (spawn-server) @@ -6,3 +8,5 @@ (add-hook! key-press-hook (lambda (key unicode) (when (eq? key 'escape) (quit-game)))) + +(add-hook! window-close-hook quit-game) |