summaryrefslogtreecommitdiff
path: root/elisp/geiser-doc.el
diff options
context:
space:
mode:
Diffstat (limited to 'elisp/geiser-doc.el')
-rw-r--r--elisp/geiser-doc.el13
1 files changed, 5 insertions, 8 deletions
diff --git a/elisp/geiser-doc.el b/elisp/geiser-doc.el
index a329755..866d65b 100644
--- a/elisp/geiser-doc.el
+++ b/elisp/geiser-doc.el
@@ -279,14 +279,11 @@ With prefix, the current page is deleted from history."
(let ((map (make-sparse-keymap)))
(suppress-keymap map)
(set-keymap-parent map button-buffer-map)
- (define-key map "a" 'geiser-apropos)
- (define-key map "c" 'geiser-doc-clean-history)
- (define-key map "k" 'geiser-doc-kill-page)
- (define-key map "n" 'geiser-doc-next)
- (define-key map "l" 'geiser-doc-previous)
- (define-key map "p" 'geiser-doc-previous)
- (define-key map "r" 'geiser-doc-refresh)
- (define-key map (kbd "SPC") 'scroll-up)
+ (define-key map "\C-c\C-c" 'geiser-doc-clean-history)
+ (define-key map "\C-c\C-k" 'geiser-doc-kill-page)
+ (define-key map "\C-c\C-f" 'geiser-doc-next)
+ (define-key map "\C-c\C-b" 'geiser-doc-previous)
+ (define-key map "\C-c\C-r" 'geiser-doc-refresh)
(define-key map (kbd "S-SPC") 'scroll-down)
(define-key map "\M-." 'geiser-doc-edit-symbol-at-point)
(define-key map "\C-cz" 'run-geiser)