summaryrefslogtreecommitdiff
path: root/elisp/geiser-menu.el
diff options
context:
space:
mode:
Diffstat (limited to 'elisp/geiser-menu.el')
-rw-r--r--elisp/geiser-menu.el6
1 files changed, 4 insertions, 2 deletions
diff --git a/elisp/geiser-menu.el b/elisp/geiser-menu.el
index a298092..f1aa5d8 100644
--- a/elisp/geiser-menu.el
+++ b/elisp/geiser-menu.el
@@ -89,7 +89,8 @@
(defmacro geiser-menu--mode-toggle (title bindings mode keymap map)
`(geiser-menu--add-item ,keymap ,map
- (,title ,bindings ,mode :button (:toggle . (and (boundp ',mode) ,mode)))))
+ (,title ,bindings ,mode
+ :button (:toggle . (and (boundp ',mode) ,mode)))))
(defmacro geiser-menu--defmenu (name keymap &rest keys)
(let ((mmap (make-symbol "mmap")))
@@ -102,7 +103,8 @@
(cons "Switch to" geiser-menu--custom-switch))
(define-key ,mmap [Run] (cons "Run" geiser-menu--custom-run))
(geiser-menu--add-line ,mmap)
- (geiser-menu--add-items ,keymap ,mmap ,keys)))))
+ (geiser-menu--add-items ,keymap ,mmap ,keys)
+ ,mmap))))
(put 'geiser-menu--defmenu 'lisp-indent-function 2)