summaryrefslogtreecommitdiff
path: root/elisp/geiser-doc.el
diff options
context:
space:
mode:
authorJose Antonio Ortega Ruiz <jao@gnu.org>2010-06-14 04:17:54 +0200
committerJose Antonio Ortega Ruiz <jao@gnu.org>2010-06-14 04:17:54 +0200
commitd92baad9f8e9f205ca1dc642e7f763ddbcfec43b (patch)
tree49e4345c2abb4e92e4f78797817bbdef598406c1 /elisp/geiser-doc.el
parent61a0065711cde95ed7a20f183e871b4628a415b4 (diff)
downloadgeiser-chez-d92baad9f8e9f205ca1dc642e7f763ddbcfec43b.tar.gz
geiser-chez-d92baad9f8e9f205ca1dc642e7f763ddbcfec43b.tar.bz2
Better menus.
Diffstat (limited to 'elisp/geiser-doc.el')
-rw-r--r--elisp/geiser-doc.el10
1 files changed, 5 insertions, 5 deletions
diff --git a/elisp/geiser-doc.el b/elisp/geiser-doc.el
index 33d2c1a..6bb4ba5 100644
--- a/elisp/geiser-doc.el
+++ b/elisp/geiser-doc.el
@@ -352,15 +352,16 @@ With prefix, the current page is deleted from history."
(defun geiser-doc--visible-p () )
-(geiser-menu--defmenu geiser-doc-mode-map (eq major-mode 'geiser-doc-mode)
+(geiser-menu--defmenu doc geiser-doc-mode-map
("Next" "\C-c\C-f" geiser-doc-next "Next item"
:enable (geiser-doc--history-next-p))
("Previous" "\C-c\C-b" geiser-doc-previous "Previous item"
:enable (geiser-doc--history-previous-p))
("Refresh" "\C-c\C-r" geiser-doc-refresh "Refresh current page")
- (menu "Manage history"
- ("Kill item" "\C-c\C-k" geiser-doc-kill-page "Kill this page")
- ("Clean history" "\C-c\C-c" geiser-doc-clean-history))
+ line
+ ("Kill item" "\C-c\C-k" geiser-doc-kill-page "Kill this page")
+ ("Clean history" "\C-c\C-c" geiser-doc-clean-history)
+ line
(custom "Browser options" geiser-doc))
(defun geiser-doc-mode ()
@@ -373,7 +374,6 @@ With prefix, the current page is deleted from history."
(set-syntax-table scheme-mode-syntax-table)
(setq mode-name "Geiser Doc")
(setq major-mode 'geiser-doc-mode)
- (geiser-menu--provide)
(setq buffer-read-only t))
(geiser-popup--define doc "*Geiser documentation*" geiser-doc-mode)