From dca6b77cab8309734a9539ab375f5160210882f5 Mon Sep 17 00:00:00 2001 From: Stefan Monnier Date: Wed, 30 Apr 2003 20:53:04 +0000 Subject: (easy-menu-get-map): Correctly handle non-submap bindings. --- lisp/emacs-lisp/easymenu.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'lisp/emacs-lisp') diff --git a/lisp/emacs-lisp/easymenu.el b/lisp/emacs-lisp/easymenu.el index 5779cd2b9d6..2bed70866a1 100644 --- a/lisp/emacs-lisp/easymenu.el +++ b/lisp/emacs-lisp/easymenu.el @@ -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 -- cgit v1.2.3