summaryrefslogtreecommitdiff
path: root/lisp/emacs-lisp
diff options
context:
space:
mode:
authorRichard M. Stallman <rms@gnu.org>1994-01-06 04:59:17 +0000
committerRichard M. Stallman <rms@gnu.org>1994-01-06 04:59:17 +0000
commitac8a83413fc8568524199285944550f1e905006a (patch)
tree552fbb6f25269ede9f869ce58dba3d22b291aa18 /lisp/emacs-lisp
parent4f1d6310e1f7bf74afab2f04908611ec8e5f7cc8 (diff)
downloademacs-ac8a83413fc8568524199285944550f1e905006a.tar.gz
(make-lucid-menu-keymap): For "----", make blank line.
Diffstat (limited to 'lisp/emacs-lisp')
-rw-r--r--lisp/emacs-lisp/lmenu.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/emacs-lisp/lmenu.el b/lisp/emacs-lisp/lmenu.el
index 3883d0ed4be..d06b4d56fee 100644
--- a/lisp/emacs-lisp/lmenu.el
+++ b/lisp/emacs-lisp/lmenu.el
@@ -63,7 +63,7 @@
command enabler name)
(cond ((stringp item)
(setq command nil)
- (setq name item))
+ (setq name (if (equal item "----") "" item)))
((consp item)
(setq command (make-lucid-menu-keymap (car item) (cdr item)))
(setq name (car item)))