From 00fa240ffe88f3f00ab3319ed4bacdd71aa87134 Mon Sep 17 00:00:00 2001 From: Jose Antonio Ortega Ruiz Date: Sun, 14 Nov 2010 22:36:17 +0100 Subject: Smoother REPL exit (deactivating the connection) --- elisp/geiser-repl.el | 1 + 1 file changed, 1 insertion(+) (limited to 'elisp/geiser-repl.el') 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 -- cgit v1.2.3