From 72596e2f24877e1393b398537803ea6509f69a6a Mon Sep 17 00:00:00 2001 From: Stefan Monnier Date: Wed, 22 Nov 2000 16:46:52 +0000 Subject: [PATCH] (popup-menu): Stupid typo. --- lisp/mouse.el | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/lisp/mouse.el b/lisp/mouse.el index d5ae00fb872..7b9debc7b09 100644 --- a/lisp/mouse.el +++ b/lisp/mouse.el @@ -55,9 +55,9 @@ PREFIX is the prefix argument (if any) to pass to the command." ((keymapp menu) menu) ((and (listp menu) (keymapp (car menu))) menu) (t (let* ((map (easy-menu-create-menu (car menu) (cdr menu))) - (filter (when (symbolp map) - (plist-get (get map 'menu-pro) :filter)))) - (if filter (funcall filter (symbol-function map)) map))))) + (filter (when (symbolp map) + (plist-get (get map 'menu-prop) :filter)))) + (if filter (funcall filter (symbol-function map)) map))))) event cmd) (unless position (let ((mp (mouse-pixel-position)))