fix: doom-quit-p when use-dialog-box

I don't know what I was thinking, but I need more sleep.

Amend: 1a0fb88897
This commit is contained in:
Henrik Lissner
2025-04-15 19:07:13 -04:00
parent d8b36d8b17
commit 009a285c0a

View File

@ -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"))))