Commit fb55ff10 authored by Eli Zaretskii's avatar Eli Zaretskii
Browse files

(widget-choose): Call display-popup-menus-p instead

of display-mouse-p.
parent e6cddb1a
2001-01-09 Eli Zaretskii <eliz@is.elta.co.il>
* wid-edit.el (widget-choose): Call display-popup-menus-p instead
of display-mouse-p.
2001-01-09 Kenichi Handa <handa@etl.go.jp> 2001-01-09 Kenichi Handa <handa@etl.go.jp>
* international/mule.el (make-coding-system): If the coding system * international/mule.el (make-coding-system): If the coding system
......
...@@ -204,7 +204,7 @@ mouse event, and the number of elements in items is less than ...@@ -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 `widget-menu-max-size', a popup menu will be used, otherwise the
minibuffer." minibuffer."
(cond ((and (< (length items) widget-menu-max-size) (cond ((and (< (length items) widget-menu-max-size)
event (display-mouse-p)) event (display-popup-menus-p))
;; Mouse click. ;; Mouse click.
(x-popup-menu event (x-popup-menu event
(list title (cons "" items)))) (list title (cons "" items))))
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment