summaryrefslogtreecommitdiff
path: root/elisp/geiser-repl.el
diff options
context:
space:
mode:
authorJose Antonio Ortega Ruiz <jao@gnu.org>2010-09-01 04:29:30 +0200
committerJose Antonio Ortega Ruiz <jao@gnu.org>2010-09-01 04:29:30 +0200
commit2d060d01b4fe318ca7b59fe3acf665491499bc08 (patch)
tree851d835409db522ce5b936a35ff4b416b68ca6cf /elisp/geiser-repl.el
parentce9edd46388e9b5eb2b5f77a4e04517fa8eef33b (diff)
downloadgeiser-2d060d01b4fe318ca7b59fe3acf665491499bc08.tar.gz
geiser-2d060d01b4fe318ca7b59fe3acf665491499bc08.tar.bz2
Fix for C-c C-m (enter module) in REPL
Diffstat (limited to 'elisp/geiser-repl.el')
-rw-r--r--elisp/geiser-repl.el3
1 files changed, 2 insertions, 1 deletions
diff --git a/elisp/geiser-repl.el b/elisp/geiser-repl.el
index ac4413e..dd85808 100644
--- a/elisp/geiser-repl.el
+++ b/elisp/geiser-repl.el
@@ -271,7 +271,8 @@ module command as a string")
(cmd (and module
(geiser-repl--enter-cmd geiser-impl--implementation
module))))
- (switch-to-geiser nil nil buffer)
+ (unless (eq major-mode 'geiser-repl-mode)
+ (switch-to-geiser nil nil (or buffer (current-buffer))))
(geiser-repl--send cmd)))
(geiser-impl--define-caller geiser-repl--import-cmd import-command (module)