summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorJose Antonio Ortega Ruiz <jao@gnu.org>2009-05-02 15:16:20 +0200
committerJose Antonio Ortega Ruiz <jao@gnu.org>2009-05-02 15:16:20 +0200
commite5624bcc1b001f3839b7dba3bc3f396799dca75f (patch)
tree82c500ec6c3994450f822a20f85775eb7cb67221
parent410eaca7a6ed7565bdacc92e411fa20627da08e7 (diff)
downloadgeiser-chez-e5624bcc1b001f3839b7dba3bc3f396799dca75f.tar.gz
geiser-chez-e5624bcc1b001f3839b7dba3bc3f396799dca75f.tar.bz2
REPL: C-d does not send EOF. Kill scheme with C-cC-d if you need to.
-rw-r--r--elisp/geiser-repl.el2
1 files changed, 2 insertions, 0 deletions
diff --git a/elisp/geiser-repl.el b/elisp/geiser-repl.el
index b8f0c98..602122b 100644
--- a/elisp/geiser-repl.el
+++ b/elisp/geiser-repl.el
@@ -283,6 +283,8 @@ If no REPL is running, execute `run-geiser' to start a fresh one."
(setq geiser-eval--get-module-function 'geiser-repl--module-function)
(when geiser-repl-autodoc-p (geiser-autodoc-mode 1)))
+(define-key geiser-repl-mode-map "\C-d" 'delete-char)
+
(define-key geiser-repl-mode-map "\C-cz" 'run-geiser)
(define-key geiser-repl-mode-map "\C-c\C-z" 'run-geiser)
(define-key geiser-repl-mode-map "\C-a" 'geiser-repl--bol)