Mercurial > emacs
changeset 57978:3141e565abf7
(easy-menu-get-map): Fix last change.
| author | Andreas Schwab <schwab@suse.de> |
|---|---|
| date | Sat, 06 Nov 2004 14:42:36 +0000 |
| parents | 4d59239d9b1d |
| children | 8f1dc4ca4d6e |
| 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 Sat Nov 06 14:41:21 2004 +0000 +++ b/lisp/emacs-lisp/easymenu.el Sat Nov 06 14:42:36 2004 +0000 @@ -622,7 +622,7 @@ (catch 'found (if (and map (symbolp map) (not (keymapp map))) (setq map (symbol-value map))) - (let ((maps (or map (current-active-maps)))) + (let ((maps (if map (list map) (current-active-maps)))) ;; Look for PATH in each map. (unless map (push 'menu-bar path)) (dolist (name path)