XEmacs 21.4.4 "Artificial Intelligence".

[chise/xemacs-chise.git.1] / lisp / cus-edit.el

diff --git a/lisp/cus-edit.el b/lisp/cus-edit.el
index 5de0795..12ae67f 100644 (file)
--- a/lisp/cus-edit.el
+++ b/lisp/cus-edit.el
@@ -612,7 +612,7 @@ when the action is chosen.")
   (interactive)
   (let ((children custom-options))
     (mapc (lambda (child)
-           (when (eq (widget-get child :custom-state) 'modified)
+           (when (memq (widget-get child :custom-state) '(modified set saved))
              (widget-apply child :custom-reset-standard)))
          children)))