summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorJose Antonio Ortega Ruiz <jao@gnu.org>2015-09-08 23:51:21 +0200
committerJose Antonio Ortega Ruiz <jao@gnu.org>2015-09-08 23:51:21 +0200
commit0bbb486df3d8b79a0f8356063b8dc9ea4c33e38c (patch)
tree0f492c9fdf5e939ab59f74b4911b4919b07238c7
parentbb3667a580d5c8dca7d88c0aaca6390c55978974 (diff)
downloadgeiser-0bbb486df3d8b79a0f8356063b8dc9ea4c33e38c.tar.gz
geiser-0bbb486df3d8b79a0f8356063b8dc9ea4c33e38c.tar.bz2
Ensuring switch-to-geiser asks for an implementation
Should fix issue #85
-rw-r--r--elisp/geiser-repl.el5
1 files changed, 3 insertions, 2 deletions
diff --git a/elisp/geiser-repl.el b/elisp/geiser-repl.el
index 57398fa..7518e0b 100644
--- a/elisp/geiser-repl.el
+++ b/elisp/geiser-repl.el
@@ -348,7 +348,7 @@ module command as a string")
(when (not geiser-repl-skip-version-check-p)
(let ((v (geiser-repl--version impl (geiser-repl--binary impl)))
(r (geiser-repl--min-version impl)))
- (when (geiser--version< v r)
+ (when (and v r (geiser--version< v r))
(error "Geiser requires %s version %s but detected %s" impl r v)))))
(defun geiser-repl--start-repl (impl address)
@@ -784,7 +784,8 @@ If no REPL is running, execute `run-geiser' to start a fresh one."
(geiser-repl--switch-to-buffer geiser-repl--last-scm-buffer)))
(repl (geiser-repl--switch-to-buffer repl))
((geiser-repl--remote-p) (geiser-connect impl))
- (t (run-geiser impl)))
+ (impl (run-geiser impl))
+ (t (call-interactively 'run-geiser)))
(geiser-repl--maybe-remember-scm-buffer buffer)))
(defun switch-to-geiser-module (&optional module buffer)