# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 757832357 0
# Node ID 5bb33851230e2c6b22843f4e4f30947eb2b0d7c2
# Parent  3bd42ee22d1f10a288b54b11c220c5ccc6d032a1
(make-lucid-menu-keymap): For "----", make blank line.

diff -r 3bd42ee22d1f -r 5bb33851230e lisp/emacs-lisp/lmenu.el
--- a/lisp/emacs-lisp/lmenu.el	Thu Jan 06 04:39:00 1994 +0000
+++ b/lisp/emacs-lisp/lmenu.el	Thu Jan 06 04:59:17 1994 +0000
@@ -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)))