(easy-menu-convert-item-1): Only intern if the label is a string.

This commit is contained in:
Stefan Monnier 2000-07-14 08:43:32 +00:00
parent 3a4f3f86ef
commit 115f38ae50

View file

@ -354,7 +354,7 @@ MENU, just change it, otherwise put it last in MENU."
;; `intern' the name so as to merge multiple entries with the same name.
;; It also makes it easier/possible to lookup/change menu bindings
;; via keymap functions.
(cons (intern name)
(cons (if (stringp name) (intern name) name)
(and (not remove)
(cons 'menu-item
(cons label