summaryrefslogtreecommitdiff
path: root/lisp/wid-edit.el
diff options
context:
space:
mode:
authorEli Zaretskii <eliz@gnu.org>2001-01-09 10:08:51 +0000
committerEli Zaretskii <eliz@gnu.org>2001-01-09 10:08:51 +0000
commitfb55ff106a38ac23766450dff67fb608871c87fa (patch)
tree93faefe644e61bb139dc20e8a0f6d4e6d8895930 /lisp/wid-edit.el
parente6cddb1aa28852c4adeec420f5c9b54d703ba2e0 (diff)
downloademacs-fb55ff106a38ac23766450dff67fb608871c87fa.tar.gz
(widget-choose): Call display-popup-menus-p instead
of display-mouse-p.
Diffstat (limited to 'lisp/wid-edit.el')
-rw-r--r--lisp/wid-edit.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/wid-edit.el b/lisp/wid-edit.el
index 52851524b8a..34d9fb75a9d 100644
--- a/lisp/wid-edit.el
+++ b/lisp/wid-edit.el
@@ -204,7 +204,7 @@ mouse event, and the number of elements in items is less than
`widget-menu-max-size', a popup menu will be used, otherwise the
minibuffer."
(cond ((and (< (length items) widget-menu-max-size)
- event (display-mouse-p))
+ event (display-popup-menus-p))
;; Mouse click.
(x-popup-menu event
(list title (cons "" items))))