(easy-menu-get-map): Fix last change.
This commit is contained in:
parent
98961e08e5
commit
cffe562a9f
2 changed files with 5 additions and 1 deletions
|
@ -1,3 +1,7 @@
|
|||
2004-11-06 Andreas Schwab <schwab@suse.de>
|
||||
|
||||
* emacs-lisp/easymenu.el (easy-menu-get-map): Fix last change.
|
||||
|
||||
2004-11-06 Stefan Monnier <monnier@iro.umontreal.ca>
|
||||
|
||||
* emacs-lisp/easymenu.el (easy-menu-get-map-look-for-name): Remove.
|
||||
|
|
|
@ -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)
|
||||
|
|
Loading…
Add table
Reference in a new issue