Mercurial > emacs
changeset 97546:57c9b0f7df3e
(custom-toggle-hide): Allow hiding only if widget is saved.
author | Chong Yidong <cyd@stupidchicken.com> |
---|---|
date | Tue, 19 Aug 2008 01:49:04 +0000 |
parents | b24a1581ac16 |
children | 1c58e58f90a5 |
files | lisp/cus-edit.el |
diffstat | 1 files changed, 2 insertions(+), 2 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/cus-edit.el Tue Aug 19 01:48:39 2008 +0000 +++ b/lisp/cus-edit.el Tue Aug 19 01:49:04 2008 +0000 @@ -2244,8 +2244,8 @@ "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