diff options
author | Jose Antonio Ortega Ruiz <jao@gnu.org> | 2010-08-06 18:04:58 +0200 |
---|---|---|
committer | Jose Antonio Ortega Ruiz <jao@gnu.org> | 2010-08-06 18:04:58 +0200 |
commit | 3572a10cc7e9328f491ca20d95e05ae0e377e218 (patch) | |
tree | be7b528d50d8e4f0753cdf9b64e5de4603fd4864 | |
parent | 654bfbff2675c45882857411c7a2f3594e708639 (diff) | |
download | geiser-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-- | README | 39 | ||||
-rw-r--r-- | elisp/geiser-repl.el | 10 |
2 files changed, 25 insertions, 24 deletions
@@ -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)) -- |