From 4f1d94031dd370cc77a1b4eaa484bcab159f941e Mon Sep 17 00:00:00 2001
From: Jose Antonio Ortega Ruiz <jao@gnu.org>
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(+)

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