diff options
| author | Andreas Schwab <schwab@suse.de> | 2004-11-06 14:43:43 +0000 |
|---|---|---|
| committer | Andreas Schwab <schwab@suse.de> | 2004-11-06 14:43:43 +0000 |
| commit | cffe562a9f6b41ba541daf86af7aba1883cc1c22 (patch) | |
| tree | 3dcbc9d6a4d70e373bbfc16b17a5b35d1fc6ae58 /lisp/emacs-lisp | |
| parent | 98961e08e5e8d0c69a849696e6af4e3cd9faaa4a (diff) | |
| download | emacs-cffe562a9f6b41ba541daf86af7aba1883cc1c22.tar.gz emacs-cffe562a9f6b41ba541daf86af7aba1883cc1c22.tar.bz2 emacs-cffe562a9f6b41ba541daf86af7aba1883cc1c22.zip | |
(easy-menu-get-map): Fix last change.
Diffstat (limited to 'lisp/emacs-lisp')
| -rw-r--r-- | lisp/emacs-lisp/easymenu.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/emacs-lisp/easymenu.el b/lisp/emacs-lisp/easymenu.el index 91de4e670f7..7b18756fd7e 100644 --- a/lisp/emacs-lisp/easymenu.el +++ b/lisp/emacs-lisp/easymenu.el @@ -622,7 +622,7 @@ In some cases we use that to select between the local and global maps." (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) |