From abcb7b6737bbe925bd0597a4a526fabb02e95fe8 Mon Sep 17 00:00:00 2001
From: Jose Antonio Ortega Ruiz <jao@gnu.org>
Date: Tue, 31 Aug 2010 21:30:46 +0200
Subject: Correctly deactivating autodoc when leaving geiser-mode

---
 elisp/geiser-mode.el | 6 ++++--
 1 file changed, 4 insertions(+), 2 deletions(-)

diff --git a/elisp/geiser-mode.el b/elisp/geiser-mode.el
index 6f02204..dc154bc 100644
--- a/elisp/geiser-mode.el
+++ b/elisp/geiser-mode.el
@@ -206,8 +206,10 @@ interacting with the Geiser REPL is at your disposal.
   (setq geiser-autodoc-mode-string "/A")
   (setq geiser-smart-tab-mode-string "/T")
   (geiser-company--setup (and geiser-mode geiser-mode-company-p))
-  (when geiser-mode-autodoc-p (geiser-autodoc-mode geiser-mode))
-  (when geiser-mode-smart-tab-p (geiser-smart-tab-mode geiser-mode)))
+  (when geiser-mode-autodoc-p
+    (geiser-autodoc-mode (if geiser-mode 1 -1)))
+  (when geiser-mode-smart-tab-p
+    (geiser-smart-tab-mode (if geiser-mode 1 -1))))
 
 (defun turn-on-geiser-mode ()
   "Enable `geiser-mode' (in a Scheme buffer)."
-- 
cgit v1.2.3