From: Lars Ingebrigtsen Date: Mon, 10 Feb 2014 04:26:10 +0000 (-0800) Subject: * files.el (confirm-kill-emacs): Allow specifying an arbitrary predicate function. X-Git-Tag: emacs-24.3.90~173^2^2~42^2~45^2~52 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=6abe458993df450de8361c6cab3cf89e8c89c962;p=emacs.git * files.el (confirm-kill-emacs): Allow specifying an arbitrary predicate function. Fixes: debbugs:15455 --- diff --git a/lisp/ChangeLog b/lisp/ChangeLog index b76e0c174c2..42af81b2217 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2014-02-10 Lars Ingebrigtsen + + * files.el (confirm-kill-emacs): Allow specifying an arbitrary + predicate function (bug#15455). + 2014-02-10 Dmitry Gutov * ielm.el (inferior-emacs-lisp-mode): Instead of diff --git a/lisp/files.el b/lisp/files.el index 686a1b7c5d3..88b6ae6dae7 100644 --- a/lisp/files.el +++ b/lisp/files.el @@ -6501,7 +6501,8 @@ If nil, the default, don't ask at all. If the value is non-nil, it should be a predicate function such as `yes-or-no-p'." :type '(choice (const :tag "Ask with yes-or-no-p" yes-or-no-p) (const :tag "Ask with y-or-n-p" y-or-n-p) - (const :tag "Don't confirm" nil)) + (const :tag "Don't confirm" nil) + (function :tag "Predicate function")) :group 'convenience :version "21.1")