projects
/
chise
/
xemacs-chise.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
(byte-compile-insert-header): Use `raw-text' instead of
[chise/xemacs-chise.git]
/
lisp
/
easymenu.el
diff --git
a/lisp/easymenu.el
b/lisp/easymenu.el
index
9678183
..
906b51d
100644
(file)
--- a/
lisp/easymenu.el
+++ b/
lisp/easymenu.el
@@
-148,9
+148,9
@@
A menu item can be a list. It is treated as a submenu.
The first element should be the submenu name. That's used as the
menu item in the top-level menu. The cdr of the submenu list
is a list of menu items, as above."
The first element should be the submenu name. That's used as the
menu item in the top-level menu. The cdr of the submenu list
is a list of menu items, as above."
- (` (progn
- (defvar (, symbol) nil (, doc))
- (easy-menu-do-define (quote (, symbol)) (, maps) (, doc) (, menu)))))
+ `(progn
+ (defvar ,symbol nil ,doc)
+ (easy-menu-do-define (quote ,symbol) ,maps ,doc ,menu)))
(defun easy-menu-do-define (symbol maps doc menu)
(if (featurep 'menubar)
(defun easy-menu-do-define (symbol maps doc menu)
(if (featurep 'menubar)