mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-11-21 06:55:39 +00:00
Code Issues Releases Activity

save-buffers-kill-emacs: Adjust confirmation prompt when restarting

Browse Source 
* lisp/files.el (save-buffers-kill-emacs): When restarting, ask
"Really restart Emacs?".
This commit is contained in:
Sean Whitton 2024-10-25 12:43:23 +08:00
parent 9729353ba0
commit df677f65fd
1 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
lisp/files.el
View File

@ -8490,7 +8490,8 @@ If RESTART, restart Emacs after killing the current Emacs process."
;; Query the user for other things, perhaps.
(run-hook-with-args-until-failure 'kill-emacs-query-functions)
(or (null confirm)
(funcall confirm "Really exit Emacs? "))
(funcall confirm (format "Really %s Emacs? "
(if restart "restart" "exit"))))
(kill-emacs nil restart))))
(defun save-buffers-kill-terminal (&optional arg)