summaryrefslogtreecommitdiff
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
parent654bfbff2675c45882857411c7a2f3594e708639 (diff)
downloadgeiser-chez-3572a10cc7e9328f491ca20d95e05ae0e377e218.tar.gz
geiser-chez-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
-rw-r--r--README39
-rw-r--r--elisp/geiser-repl.el10
2 files changed, 25 insertions, 24 deletions
diff --git a/README b/README
index 09b52c7..90b45d5 100644
--- a/README
+++ b/README
@@ -129,25 +129,26 @@
*** In the REPL
- |----------------+----------------------------------------------------|
- | C-c C-z, C-c z | Start Scheme REPL, or jump to previous buffer |
- | C-c C-q | Kill Scheme process |
- |----------------+----------------------------------------------------|
- | M-. | Edit identifier at point |
- | TAB, M-TAB | Complete identifier at point |
- | M-`, C-. | Complete module name at point |
- |----------------+----------------------------------------------------|
- | M-p, M-n | Prompt history, matching current prefix |
- |----------------+----------------------------------------------------|
- | C-c C-k, C-c k | Nuke REPL: use it if the REPL becomes unresponsive |
- |----------------+----------------------------------------------------|
- | C-c C-m, C-c m | Set current module |
- | C-c C-l, C-c l | Load scheme file |
- |----------------+----------------------------------------------------|
- | C-c C-d C-d | See documentation for symbol at point |
- | C-c C-d C-m | See documentation for module |
- | C-c C-a, C-c a | Toggle autodoc mode |
- |----------------+----------------------------------------------------|
+ |-------------+----------------------------------------------------|
+ | C-c C-z | Start Scheme REPL, or jump to previous buffer |
+ | C-c C-q | Kill Scheme process |
+ |-------------+----------------------------------------------------|
+ | M-. | Edit identifier at point |
+ | TAB, M-TAB | Complete identifier at point |
+ | M-`, C-. | Complete module name at point |
+ |-------------+----------------------------------------------------|
+ | M-p, M-n | Prompt history, matching current prefix |
+ |-------------+----------------------------------------------------|
+ | C-c C-k | Nuke REPL: use it if the REPL becomes unresponsive |
+ |-------------+----------------------------------------------------|
+ | C-c C-m | Set current module |
+ | C-c C-i | Import module into current namespace |
+ | C-c C-l | Load scheme file |
+ |-------------+----------------------------------------------------|
+ | C-c C-d C-d | See documentation for symbol at point |
+ | C-c C-d C-m | See documentation for module |
+ | C-c C-d C-a | Toggle autodoc mode |
+ |-------------+----------------------------------------------------|
*** In the documentation browser:
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))
--