summaryrefslogtreecommitdiff
path: root/elisp
diff options
context:
space:
mode:
authorJose Antonio Ortega Ruiz <jao@gnu.org>2010-08-06 18:04:58 +0200
committerJose Antonio Ortega Ruiz <jao@gnu.org>2010-08-06 18:04:58 +0200
commit3572a10cc7e9328f491ca20d95e05ae0e377e218 (patch)
treebe7b528d50d8e4f0753cdf9b64e5de4603fd4864 /elisp
parent654bfbff2675c45882857411c7a2f3594e708639 (diff)
downloadgeiser-guile-3572a10cc7e9328f491ca20d95e05ae0e377e218.tar.gz
geiser-guile-3572a10cc7e9328f491ca20d95e05ae0e377e218.tar.bz2
Removing key bindings of the form C-c <alphabetic>.
These are reserved for users. See http://www.gnu.org/software/emacs/elisp/html_node/Key-Binding-Conventions.htm
Diffstat (limited to 'elisp')
-rw-r--r--elisp/geiser-repl.el10
1 files changed, 5 insertions, 5 deletions
diff --git a/elisp/geiser-repl.el b/elisp/geiser-repl.el
index d969164..37572d0 100644
--- a/elisp/geiser-repl.el
+++ b/elisp/geiser-repl.el
@@ -329,7 +329,7 @@ module command as a string")
(when (buffer-name (current-buffer))
(comint-kill-region comint-last-input-start (point))
(insert "\nIt's been nice interacting with you!\n")
- (insert "Press C-cz to bring me back.\n" )))))))
+ (insert "Press C-c C-z to bring me back.\n" )))))))
(defun geiser-repl--on-kill ()
(geiser-repl--on-quit)
@@ -442,8 +442,8 @@ module command as a string")
("Edit symbol" "\M-." geiser-edit-symbol-at-point
:enable (symbol-at-point))
--
- ("Switch to module..." ("\C-cm" "\C-c\C-m") switch-to-geiser-module)
- ("Import module..." ("\C-ci" "\C-c\C-i") geiser-repl-import-module)
+ ("Switch to module..." "\C-c\C-m" switch-to-geiser-module)
+ ("Import module..." "\C-c\C-i" geiser-repl-import-module)
--
("Previous matching input" "\M-p" comint-previous-matching-input-from-input
"Previous input matching current")
@@ -461,9 +461,9 @@ module command as a string")
--
("Kill Scheme interpreter" "\C-c\C-q" comint-kill-subjob
:enable (geiser-repl--this-buffer-repl))
- ("Restart" ("\C-cz" "\C-c\C-z") switch-to-geiser
+ ("Restart" "\C-c\C-z" switch-to-geiser
:enable (not (geiser-repl--this-buffer-repl)))
- ("Revive REPL" ("\C-ck" "\C-c\C-k") geiser-repl-nuke
+ ("Revive REPL" "\C-c\C-k" geiser-repl-nuke
"Use this command if the REPL becomes irresponsive"
:enable (geiser-repl--this-buffer-repl))
--