summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorJose Antonio Ortega Ruiz <jao@gnu.org>2009-06-14 22:19:36 +0200
committerJose Antonio Ortega Ruiz <jao@gnu.org>2009-06-14 22:19:36 +0200
commitd8da8d0e8733bb5c2fc01347be17dfc7c1c4cfa7 (patch)
tree84803d5aca558d400c825f2aaa6196ddc35111b0
parentf9d746bd4600d34d3b3fe72d5159b58d6160bfb9 (diff)
downloadgeiser-d8da8d0e8733bb5c2fc01347be17dfc7c1c4cfa7.tar.gz
geiser-d8da8d0e8733bb5c2fc01347be17dfc7c1c4cfa7.tar.bz2
Fixes in geiser-reload (unload forcibly and pick repl implementations).
-rw-r--r--elisp/geiser-impl.el2
-rw-r--r--elisp/geiser-repl.el2
2 files changed, 2 insertions, 2 deletions
diff --git a/elisp/geiser-impl.el b/elisp/geiser-impl.el
index 6bc4e79..d45fadc 100644
--- a/elisp/geiser-impl.el
+++ b/elisp/geiser-impl.el
@@ -213,7 +213,7 @@ implementation to be used by Geiser."))
(defun geiser-impl-unload-function ()
(dolist (imp (mapcar 'geiser-impl--impl-feature geiser-impl--impls))
- (when (featurep imp) (unload-feature imp)))
+ (when (featurep imp) (unload-feature imp t)))
t)
(defun geiser-impl--reload-implementations (impls)
diff --git a/elisp/geiser-repl.el b/elisp/geiser-repl.el
index f4d85dc..da7dde7 100644
--- a/elisp/geiser-repl.el
+++ b/elisp/geiser-repl.el
@@ -326,7 +326,7 @@ If no REPL is running, execute `run-geiser' to start a fresh one."
(defun geiser-repl--restore (impls)
(dolist (impl impls)
- (when impl (geiser impl))))
+ (when impl (geiser nil impl))))
(defun geiser-repl-unload-function ()
(dolist (repl geiser-repl--repls)