diff options
| author | Eli Zaretskii | 2022-03-10 20:26:13 +0200 |
|---|---|---|
| committer | Eli Zaretskii | 2022-03-10 20:26:13 +0200 |
| commit | dbe6a3ecf74536cbfb7ca59630b48020ae4e732a (patch) | |
| tree | 5d33ec801227f186fc9c67a48f0dce21e04f53b3 | |
| parent | a9920473f68ce20fe95f67a4941ff3c1fb274f2a (diff) | |
| download | emacs-dbe6a3ecf74536cbfb7ca59630b48020ae4e732a.tar.gz emacs-dbe6a3ecf74536cbfb7ca59630b48020ae4e732a.zip | |
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." | |||
| 1531 | ;;;###autoload | 1531 | ;;;###autoload |
| 1532 | (defun custom-prompt-customize-unsaved-options () | 1532 | (defun custom-prompt-customize-unsaved-options () |
| 1533 | "Prompt user to customize any unsaved customization options. | 1533 | "Prompt user to customize any unsaved customization options. |
| 1534 | Return non-nil if user chooses to customize, for use in | 1534 | Return nil if user chooses to customize, for use in |
| 1535 | `kill-emacs-query-functions'." | 1535 | `kill-emacs-query-functions'." |
| 1536 | (not (and (custom-unsaved-options) | 1536 | (not (and (custom-unsaved-options) |
| 1537 | (yes-or-no-p "Some customized options have not been saved; Examine? ") | 1537 | (yes-or-no-p |
| 1538 | (customize-unsaved) | 1538 | "Some customized options have not been saved; Examine? ") |
| 1539 | t))) | 1539 | (progn (customize-unsaved) t)))) |
| 1540 | 1540 | ||
| 1541 | ;;; Buffer. | 1541 | ;;; Buffer. |
| 1542 | 1542 | ||