From: Eli Zaretskii <eliz@gnu.org>
Date: Sun, 2 Apr 2023 07:34:43 +0000 (+0300)
Subject: * lisp/subr.el (use-dialog-box-p): Fix conditions for GUI dialogs.
X-Git-Tag: emacs-29.0.90~40
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=cb8d6ab648f;p=emacs.git

* lisp/subr.el (use-dialog-box-p): Fix conditions for GUI dialogs.
---

diff --git a/lisp/subr.el b/lisp/subr.el
index f82826e819c..cf6500d32c7 100644
--- a/lisp/subr.el
+++ b/lisp/subr.el
@@ -3540,7 +3540,8 @@ confusing to some users.")
 (defun use-dialog-box-p ()
   "Say whether the current command should prompt the user via a dialog box."
   (and last-input-event                 ; not during startup
-       (or (listp last-nonmenu-event)   ; invoked by a mouse event
+       (or (and last-nonmenu-event      ; nil is listp...
+                (listp last-nonmenu-event))   ; invoked by a mouse event
            from--tty-menu-p)            ; invoked via TTY menu
        use-dialog-box))