projects
/
chise
/
xemacs-chise.git-
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
(BOPOMOFO LETTER K): Add `->ideograph' and `chinese-isoir165'; delete
[chise/xemacs-chise.git-]
/
lisp
/
easymenu.el
diff --git
a/lisp/easymenu.el
b/lisp/easymenu.el
index
9678183
..
8059470
100644
(file)
--- a/
lisp/easymenu.el
+++ b/
lisp/easymenu.el
@@
-24,7
+24,7
@@
;; 02111-1307, USA.
;;; Synched up with: Not synched with FSF but coordinated with the FSF
;; 02111-1307, USA.
;;; Synched up with: Not synched with FSF but coordinated with the FSF
-;;; easymenu maintor for compatability with FSF 20.4.
+;;; easymenu maintor for compatibility with FSF 20.4.
;;; Please: Coordinate changes with Inge Frick <inge@nada.kth.se>
;; Commentary:
;;; Please: Coordinate changes with Inge Frick <inge@nada.kth.se>
;; Commentary:
@@
-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)