mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-01-05 11:21:04 -08:00
Code Issues Projects Releases Wiki Activity

(easy-menu-get-map): Correctly handle non-submap bindings.

Browse source
This commit is contained in:
Stefan Monnier 2003-04-30 20:53:04 +00:00
parent bb5cde6646
commit dca6b77cab
2 changed files with 85 additions and 57 deletions
Download patch file Download diff file Expand all files Collapse all files

4
lisp/emacs-lisp/easymenu.el
View file

@ -600,12 +600,12 @@ In some cases we use that to select between the local and global maps."
;; Prefer a map that already contains the to-be-modified entry.
(when to-modify
(dolist (map maps)
(when (and map (not (integerp map))
(when (and (keymapp map)
(easy-menu-get-map-look-for-name to-modify map))
(throw 'found map))))
;; Use the first valid map.
(dolist (map maps)
(when (and map (not (integerp map)))
(when (keymapp map)
(throw 'found map)))
;; Otherwise, make one up.
;; Hardcoding current-local-map is lame, but it's difficult