From: Po Lu <luangruo@yahoo.com>
Date: Mon, 1 May 2023 06:16:07 +0000 (+0800)
Subject: Fix use dialog box regression on Android
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=843d8797db80aa13f50c9bab4e3c5c4fa0b80edc;p=emacs.git

Fix use dialog box regression on Android

* lisp/subr.el (use-dialog-box-p): Always prefer dialog boxes.
---

diff --git a/lisp/subr.el b/lisp/subr.el
index b1e460b88eb..a695d52046e 100644
--- a/lisp/subr.el
+++ b/lisp/subr.el
@@ -3601,7 +3601,8 @@ confusing to some users.")
 (defun use-dialog-box-p ()
   "Return non-nil if the current command should prompt the user via a dialog box."
   (and last-input-event                 ; not during startup
-       (or (consp last-nonmenu-event)   ; invoked by a mouse event
+       (or (featurep 'android)		; prefer dialog boxes on Android
+           (consp last-nonmenu-event)   ; invoked by a mouse event
            from--tty-menu-p)            ; invoked via TTY menu
        use-dialog-box))