Mercurial > emacs
changeset 33769:7596dea75d6b
(popup-menu): Stupid typo.
| author | Stefan Monnier <monnier@iro.umontreal.ca> |
|---|---|
| date | Wed, 22 Nov 2000 16:46:52 +0000 |
| parents | 8d6dc71efabb |
| children | 4408efb1d628 |
| files | lisp/mouse.el |
| diffstat | 1 files changed, 3 insertions(+), 3 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/mouse.el Wed Nov 22 16:37:04 2000 +0000 +++ b/lisp/mouse.el Wed Nov 22 16:46:52 2000 +0000 @@ -55,9 +55,9 @@ ((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)))