changeset 50755:e09e4b2fb94d

(easy-menu-get-map): Correctly handle non-submap bindings.
author Stefan Monnier <monnier@iro.umontreal.ca>
date Wed, 30 Apr 2003 20:50:08 +0000
parents 5f08de7d192f
children 454941789575
files lisp/emacs-lisp/easymenu.el
diffstat 1 files changed, 2 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/emacs-lisp/easymenu.el	Wed Apr 30 13:10:37 2003 +0000
+++ b/lisp/emacs-lisp/easymenu.el	Wed Apr 30 20:50:08 2003 +0000
@@ -600,12 +600,12 @@
 	    ;; 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