# HG changeset patch
# User Andreas Schwab <schwab@suse.de>
# Date 1099752156 0
# Node ID 3141e565abf7caf83ca90f025ad551dce65c2eb0
# Parent  4d59239d9b1d1a9f5e5fa1ef9271d3b87e8d9e93
(easy-menu-get-map): Fix last change.

diff -r 4d59239d9b1d -r 3141e565abf7 lisp/emacs-lisp/easymenu.el
--- a/lisp/emacs-lisp/easymenu.el	Sat Nov 06 14:41:21 2004 +0000
+++ b/lisp/emacs-lisp/easymenu.el	Sat Nov 06 14:42:36 2004 +0000
@@ -622,7 +622,7 @@
 	(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)