From 009a285c0a63c305d0aa89f46122b7f98a57e897 Mon Sep 17 00:00:00 2001 From: Henrik Lissner Date: Tue, 15 Apr 2025 19:07:13 -0400 Subject: [PATCH] fix: doom-quit-p when use-dialog-box I don't know what I was thinking, but I need more sleep. Amend: 1a0fb88897fb --- lisp/lib/ui.el | 10 ++++------ 1 file changed, 4 insertions(+), 6 deletions(-) diff --git a/lisp/lib/ui.el b/lisp/lib/ui.el index 62183a086..a9d1c7b26 100644 --- a/lisp/lib/ui.el +++ b/lisp/lib/ui.el @@ -20,12 +20,10 @@ Returns t if it is safe to kill this session. Does not prompt if no real buffers are open." (or (not (ignore-errors (doom-real-buffer-list))) (if use-dialog-box - (pcase (x-popup-dialog - t `("Really quit Emacs?" - ("Quit anyway" . t) - ("Cancel" . nil))) - ('quit-anyway t) - ('cancel nil)) + (x-popup-dialog + t `("Really quit Emacs?" + ("Yes" . t) + ("Cancel" . nil))) (yes-or-no-p (format "%s" (or prompt "Really quit Emacs?")))) (ignore (message "Aborted"))))