changeset 58123:b7ee8419031b

(easy-menu-define-key): Understand the case where the keymap is a symbol.
author Stefan Monnier <monnier@iro.umontreal.ca>
date Wed, 10 Nov 2004 15:15:43 +0000
parents 1e9ea828c37a
children 28acd37455bb
files lisp/emacs-lisp/easymenu.el
diffstat 1 files changed, 1 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/emacs-lisp/easymenu.el	Wed Nov 10 14:39:40 2004 +0000
+++ b/lisp/emacs-lisp/easymenu.el	Wed Nov 10 15:15:43 2004 +0000
@@ -378,6 +378,7 @@
 BEFORE can be either a string (menu item name) or a symbol
 \(the fake function key for the menu item).
 KEY does not have to be a symbol, and comparison is done with equal."
+  (if (symbolp menu) (setq menu (indirect-function menu)))
   (let ((inserted (null item))		; Fake already inserted.
 	tail done)
     (while (not done)