From: Richard M. Stallman <rms@gnu.org>
Date: Fri, 1 May 1998 03:51:57 +0000 (+0000)
Subject: (popup-menu-popup): Fix typo: set menu-keymap.
X-Git-Tag: emacs-20.3~1199
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=3d5b2234041e5077ebb29bdc9a4b6805aac74fd2;p=emacs.git

(popup-menu-popup): Fix typo: set menu-keymap.
---

diff --git a/lisp/emacs-lisp/lmenu.el b/lisp/emacs-lisp/lmenu.el
index dcd95a54006..c67e209821a 100644
--- a/lisp/emacs-lisp/lmenu.el
+++ b/lisp/emacs-lisp/lmenu.el
@@ -227,7 +227,7 @@ The syntax, more precisely:
 						 (car pos))
 					   menu-keymap)))
       (setq cmd (lookup-key menu-keymap (apply 'vector answer)))
-      (setq menu nil)
+      (setq menu-keymap nil)
       (and cmd
 	   (if (keymapp cmd)
 	       (setq menu-keymap cmd)