From 207e2a926ad78c852fee19b3066cfcb74d2bf195 Mon Sep 17 00:00:00 2001 From: Henry Till Date: Mon, 6 Oct 2014 14:47:28 -0400 Subject: remove geiser-mode--maybe-activate from scheme-mode-hook on geiser-unload --- elisp/geiser-reload.el | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) (limited to 'elisp/geiser-reload.el') diff --git a/elisp/geiser-reload.el b/elisp/geiser-reload.el index a99c86a..3a8a65d 100644 --- a/elisp/geiser-reload.el +++ b/elisp/geiser-reload.el @@ -56,7 +56,8 @@ (let ((fs (geiser--features-list))) (unload-feature 'geiser-reload t) (dolist (f fs) - (when (featurep f) (unload-feature f t))))) + (when (featurep f) (unload-feature f t))) + (remove-hook 'scheme-mode-hook 'geiser-mode--maybe-activate))) (defun geiser-reload (&optional arg) "Reload Geiser. -- cgit v1.2.3