Mercurial > emacs

changeset 30209:f59674c820d9

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(easy-menu-convert-item-1): Only intern if the label is a string.
author Stefan Monnier <monnier@iro.umontreal.ca>
date Fri, 14 Jul 2000 08:43:32 +0000
parents e0e295d641ba
children 54603a3bd588
files lisp/emacs-lisp/easymenu.el
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/emacs-lisp/easymenu.el	Fri Jul 14 08:39:48 2000 +0000
+++ b/lisp/emacs-lisp/easymenu.el	Fri Jul 14 08:43:32 2000 +0000
@@ -354,7 +354,7 @@
     ;; `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