(custom-toggle-hide): Allow hiding only if widget is saved.

diff --git a/lisp/cus-edit.el b/lisp/cus-edit.el
index 918f43a9da0d1b5ca77dba1cee8b162684fcea45..29152e12ce8b6f3ad1013a77a1fd9a193b56a98e 100644 (file)
--- a/lisp/cus-edit.el
+++ b/lisp/cus-edit.el
@@ -2244,8 +2244,8 @@ and `face'."
   "Toggle visibility of WIDGET."
   (custom-load-widget widget)
   (let ((state (widget-get widget :custom-state)))
-    (cond ((memq state '(invalid modified))
-          (error "There are unset changes"))
+    (cond ((memq state '(invalid modified set))
+          (error "There are unsaved changes"))
          ((eq state 'hidden)
           (widget-put widget :custom-state 'unknown))
          (t