# HG changeset patch # User Stefan Monnier # Date 1100099743 0 # Node ID b7ee8419031bf3a6b88b3c2912fe26d5e408de73 # Parent 1e9ea828c37aaf19a97f2a2340fe24bc0551383b (easy-menu-define-key): Understand the case where the keymap is a symbol. diff -r 1e9ea828c37a -r b7ee8419031b lisp/emacs-lisp/easymenu.el --- 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)