diff options
| author | David Thompson <dthompson2@worcester.edu> | 2022-12-27 08:56:01 -0500 |
|---|---|---|
| committer | David Thompson <dthompson2@worcester.edu> | 2022-12-27 08:56:01 -0500 |
| commit | 985cd0fdb9d120d2e923c6b9928c0fe863e6c7ce (patch) | |
| tree | e2dde9ca25522cfedfb2eb07c45aa64685a5aca7 | |
| parent | e680f6ca28338026bb8ee43c2eba061ecad1afd9 (diff) | |
repl: Fix quit metacommand.
| -rw-r--r-- | catbird/repl.scm | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/catbird/repl.scm b/catbird/repl.scm index 965e2d8..29228d0 100644 --- a/catbird/repl.scm +++ b/catbird/repl.scm @@ -28,6 +28,7 @@ #:use-module (catbird region) #:use-module (catbird ring-buffer) #:use-module (catbird scene) + #:use-module (chickadee) #:use-module (chickadee graphics color) #:use-module (chickadee graphics path) #:use-module (chickadee graphics text) @@ -318,7 +319,7 @@ (define-meta-command ((quit q) system repl) "- Quit program." - (exit-catbird)) + (abort-game)) (define-meta-command ((import use) module repl module-name) "MODULE - Import a module." |