From: Eli Zaretskii <eliz@gnu.org>
Date: Thu, 10 Mar 2022 18:26:13 +0000 (+0200)
Subject: Fix regression in 'custom-prompt-customize-unsaved-options'
X-Git-Tag: emacs-28.0.92~3
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=dbe6a3ecf7;p=emacs.git

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

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.