]> git.eshelyaron.com Git - emacs.git/commitdiff
Make kill-emacs-query-functions into defcustom
authorLars Ingebrigtsen <larsi@gnus.org>
Thu, 28 Apr 2016 13:34:51 +0000 (15:34 +0200)
committerLars Ingebrigtsen <larsi@gnus.org>
Thu, 28 Apr 2016 13:34:51 +0000 (15:34 +0200)
* lisp/files.el (save-buffers-kill-terminal): Mention
`save-buffers-kill-emacs' (bug#10794).
(kill-emacs-query-functions): Made into a defcustom.

lisp/files.el

index d5b34af86ba6687c35e42233556e07efb6e59123..2857f6dfcacef0f35a3b0c34c13ffc40d8fcc7e1 100644 (file)
@@ -6663,11 +6663,14 @@ message to that effect instead of signaling an error."
     ;; Simulate the message printed by `ls'.
     (insert (format "%s: No such file or directory\n" file))))
 
-(defvar kill-emacs-query-functions nil
+(defcustom kill-emacs-query-functions nil
   "Functions to call with no arguments to query about killing Emacs.
 If any of these functions returns nil, killing Emacs is canceled.
 `save-buffers-kill-emacs' calls these functions, but `kill-emacs',
-the low level primitive, does not.  See also `kill-emacs-hook'.")
+the low level primitive, does not.  See also `kill-emacs-hook'."
+  :type 'hook
+  :version "25.2"
+  :group 'convenience)
 
 (defcustom confirm-kill-emacs nil
   "How to ask for confirmation when leaving Emacs.
@@ -6726,7 +6729,8 @@ if any returns nil.  If `confirm-kill-emacs' is non-nil, calls it."
 
 (defun save-buffers-kill-terminal (&optional arg)
   "Offer to save each buffer, then kill the current connection.
-If the current frame has no client, kill Emacs itself.
+If the current frame has no client, kill Emacs itself using
+`save-buffers-kill-emacs'.
 
 With prefix ARG, silently save all file-visiting buffers, then kill.