diff options
| author | Chong Yidong <cyd@stupidchicken.com> | 2008-08-19 01:49:04 +0000 |
|---|---|---|
| committer | Chong Yidong <cyd@stupidchicken.com> | 2008-08-19 01:49:04 +0000 |
| commit | fdbdd068b181f9b0981eca9ea189e5b7629a6f00 (patch) | |
| tree | cb565a2f2a5989acfc1a4d8e5381a7e642322152 | |
| parent | ca40134198aa708f9707869f6948138b2292c4f2 (diff) | |
| download | emacs-fdbdd068b181f9b0981eca9ea189e5b7629a6f00.tar.gz | |
(custom-toggle-hide): Allow hiding only if widget is saved.
| -rw-r--r-- | lisp/cus-edit.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/cus-edit.el b/lisp/cus-edit.el index 918f43a9da0..29152e12ce8 100644 --- 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 |