diff options
author | Jose Antonio Ortega Ruiz <jao@gnu.org> | 2010-09-01 04:29:30 +0200 |
---|---|---|
committer | Jose Antonio Ortega Ruiz <jao@gnu.org> | 2010-09-01 04:29:30 +0200 |
commit | 6fb4f86d76fe7138a549f32d794abc3b742bcecb (patch) | |
tree | a369315d901eb89ad1c040d8bb4fa0438d0d61c9 | |
parent | abcb7b6737bbe925bd0597a4a526fabb02e95fe8 (diff) | |
download | geiser-guile-6fb4f86d76fe7138a549f32d794abc3b742bcecb.tar.gz geiser-guile-6fb4f86d76fe7138a549f32d794abc3b742bcecb.tar.bz2 |
Fix for C-c C-m (enter module) in REPL
-rw-r--r-- | elisp/geiser-repl.el | 3 |
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) |