diff options
author | Eli Zaretskii <eliz@gnu.org> | 2022-03-10 20:26:13 +0200 |
---|---|---|
committer | Eli Zaretskii <eliz@gnu.org> | 2022-03-10 20:26:13 +0200 |
commit | dbe6a3ecf74536cbfb7ca59630b48020ae4e732a (patch) | |
tree | 5d33ec801227f186fc9c67a48f0dce21e04f53b3 | |
parent | a9920473f68ce20fe95f67a4941ff3c1fb274f2a (diff) | |
download | emacs-dbe6a3ecf74536cbfb7ca59630b48020ae4e732a.tar.gz |
Fix regression in 'custom-prompt-customize-unsaved-options'
* lisp/cus-edit.el (custom-prompt-customize-unsaved-options):
Don't depend on the value returned by 'customize-unsaved'. Fix
the doc string. Patch by Sebastian Miele <iota@whxvd.name>.
(Bug#54329)
-rw-r--r-- | lisp/cus-edit.el | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/lisp/cus-edit.el b/lisp/cus-edit.el index c2ddaeb7b19..fd42c542b46 100644 --- a/lisp/cus-edit.el +++ b/lisp/cus-edit.el @@ -1531,12 +1531,12 @@ If TYPE is `groups', include only groups." ;;;###autoload (defun custom-prompt-customize-unsaved-options () "Prompt user to customize any unsaved customization options. -Return non-nil if user chooses to customize, for use in +Return nil if user chooses to customize, for use in `kill-emacs-query-functions'." (not (and (custom-unsaved-options) - (yes-or-no-p "Some customized options have not been saved; Examine? ") - (customize-unsaved) - t))) + (yes-or-no-p + "Some customized options have not been saved; Examine? ") + (progn (customize-unsaved) t)))) ;;; Buffer. |