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

diff --git a/lisp/emacs-lisp/easymenu.el b/lisp/emacs-lisp/easymenu.el
index 49eaa551e13d89ccf63ff50e04ddfe3546419e12..3ab4fc0afa699ba465d55d9bb4a6f3d930da2744 100644 (file)
--- a/lisp/emacs-lisp/easymenu.el
+++ b/lisp/emacs-lisp/easymenu.el
@@ -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