diff options
| author | Stefan Monnier <monnier@iro.umontreal.ca> | 2000-11-22 16:46:52 +0000 |
|---|---|---|
| committer | Stefan Monnier <monnier@iro.umontreal.ca> | 2000-11-22 16:46:52 +0000 |
| commit | 36a98b3e57c9b06bacc9e5712f395dabefd71db7 (patch) | |
| tree | dff06a6505605a28c69bb6777b5959487026324c /lisp/mouse.el | |
| parent | e880309d7d4ebe65fbc7548d3467a1f90bde1902 (diff) | |
| download | emacs-36a98b3e57c9b06bacc9e5712f395dabefd71db7.tar.gz | |
(popup-menu): Stupid typo.
Diffstat (limited to 'lisp/mouse.el')
| -rw-r--r-- | lisp/mouse.el | 6 |
1 files 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))) |