(easy-menu-create-keymaps):

If two distinct items have the same string, make different
keyx events for them.

diff --git a/lisp/emacs-lisp/easymenu.el b/lisp/emacs-lisp/easymenu.el
index 081780bd4652006172a3abd1d6ca3baf031266ad..4988d0e1d1486f12330499ac569800ceeb7f060c 100644 (file)
--- a/lisp/emacs-lisp/easymenu.el
+++ b/lisp/emacs-lisp/easymenu.el
@@ -203,7 +203,11 @@ is a list of menu items, as above."
          (setq command (cons item-string command))
          (if (not have-buttons)        ; Save all items so that we can fix
              (setq old-items (cons command old-items))) ; if we have buttons.
-         (if name (define-key menu (vector (intern name)) command))))
+         (when name
+           (let ((key (vector (intern name))))
+             (if (lookup-key menu key)
+                 (setq key (vector (intern (concat name "*")))))
+             (define-key menu key command)))))
       (setq menu-items (cdr menu-items)))
     menu))