diff options
| -rw-r--r-- | elisp/geiser-repl.el | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/elisp/geiser-repl.el b/elisp/geiser-repl.el index 8c51818..4ca5b2c 100644 --- a/elisp/geiser-repl.el +++ b/elisp/geiser-repl.el @@ -612,6 +612,7 @@ With a prefix argument, force exit by killing the scheme process." (interactive "P") (when (or (not geiser-repl-query-on-exit-p) (y-or-n-p "Really quit this REPL? ")) + (geiser-con--connection-deactivate geiser-repl--connection t) (let ((cmd (and (not arg) (geiser-repl--exit-cmd geiser-impl--implementation)))) (if cmd |