# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 893994717 0
# Node ID 8941ce81cd7c424b7da6070301929f830c2680e3
# Parent  ed912554aac64f04e5e343bac601430e17eafba2
(popup-menu-popup): Fix typo: set menu-keymap.

diff -r ed912554aac6 -r 8941ce81cd7c lisp/emacs-lisp/lmenu.el
--- a/lisp/emacs-lisp/lmenu.el	Fri May 01 03:14:40 1998 +0000
+++ b/lisp/emacs-lisp/lmenu.el	Fri May 01 03:51:57 1998 +0000
@@ -227,7 +227,7 @@
 						 (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)