diff options
| author | Jose Antonio Ortega Ruiz <jao@gnu.org> | 2010-08-31 21:30:46 +0200 |
|---|---|---|
| committer | Jose Antonio Ortega Ruiz <jao@gnu.org> | 2010-08-31 21:30:46 +0200 |
| commit | abcb7b6737bbe925bd0597a4a526fabb02e95fe8 (patch) | |
| tree | 3c26510514e79efac334287a26a6c61f6f543f5b | |
| parent | 97d7a64bd4ba60aaaaad4be801becdfa9330f873 (diff) | |
| download | geiser-chez-abcb7b6737bbe925bd0597a4a526fabb02e95fe8.tar.gz geiser-chez-abcb7b6737bbe925bd0597a4a526fabb02e95fe8.tar.bz2 | |
Correctly deactivating autodoc when leaving geiser-mode
| -rw-r--r-- | elisp/geiser-mode.el | 6 |
1 files 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)." |