summaryrefslogtreecommitdiff
path: root/elisp/geiser-repl.el
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
commita78cd6452d22c9fc6594ed2fd7d0b1085d549ef4 (patch)
tree611447123e786f247a45168100842251c0519967 /elisp/geiser-repl.el
parent8792c74bb18b974f4e550a6eda464720d7c7864d (diff)
downloadgeiser-a78cd6452d22c9fc6594ed2fd7d0b1085d549ef4.tar.gz
geiser-a78cd6452d22c9fc6594ed2fd7d0b1085d549ef4.tar.bz2
REPL: C-d does not send EOF. Kill scheme with C-cC-d if you need to.
Diffstat (limited to 'elisp/geiser-repl.el')
-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)