diff options
| author | Jose Antonio Ortega Ruiz <jao@gnu.org> | 2010-07-25 23:43:50 +0200 |
|---|---|---|
| committer | Jose Antonio Ortega Ruiz <jao@gnu.org> | 2010-07-25 23:43:50 +0200 |
| commit | 0b410d7b466f86afeb2848be5e3b7a236d7da208 (patch) | |
| tree | 45bfc31eb85e0358168cc8e48dbd04aff2cf6deb /elisp/geiser-doc.el | |
| parent | 630fe511b7ca38d22dc6729b73989b20b3a21076 (diff) | |
| download | geiser-0b410d7b466f86afeb2848be5e3b7a236d7da208.tar.gz geiser-0b410d7b466f86afeb2848be5e3b7a236d7da208.tar.bz2 | |
C-c z as a to and fro jump, plus documentation.
Diffstat (limited to 'elisp/geiser-doc.el')
| -rw-r--r-- | elisp/geiser-doc.el | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/elisp/geiser-doc.el b/elisp/geiser-doc.el index bd84d7e..e8e3f58 100644 --- a/elisp/geiser-doc.el +++ b/elisp/geiser-doc.el @@ -352,6 +352,10 @@ With prefix, the current page is deleted from history." (set-keymap-parent map button-buffer-map) map)) +(defun geiser-doc-switch-to-repl () + (interactive) + (switch-to-geiser nil nil (current-buffer))) + (geiser-menu--defmenu doc geiser-doc-mode-map ("Next page" ("n" "f") geiser-doc-next "Next item" :enable (geiser-doc--history-next-p)) @@ -359,7 +363,7 @@ With prefix, the current page is deleted from history." :enable (geiser-doc--history-previous-p)) ("Next link" nil forward-button) ("Previous link" nil backward-button) - ("Go to REPL" ("z" "\C-cz" "\C-c\C-z") switch-to-geiser) + ("Go to REPL" ("z" "\C-cz" "\C-c\C-z") geiser-doc-switch-to-repl) ("Refresh" ("g" "r") geiser-doc-refresh "Refresh current page") -- ("Edit symbol" ("." "\M-.") geiser-doc-edit-symbol-at-point |