diff options
| author | Chong Yidong | 2007-03-05 15:16:08 +0000 |
|---|---|---|
| committer | Chong Yidong | 2007-03-05 15:16:08 +0000 |
| commit | fe4acc60c600c23dea5d12e4df32a91fd4039333 (patch) | |
| tree | 77190efff44c4cb02e865f7690a78b76a5ac987c | |
| parent | ee5aeb5fb8155135fa932666e1f78fdbacaebc3b (diff) | |
| download | emacs-fe4acc60c600c23dea5d12e4df32a91fd4039333.tar.gz emacs-fe4acc60c600c23dea5d12e4df32a91fd4039333.zip | |
(customize-save-variable): Clear customized-value property (saved
values are now put in theme-value property).
(customize-set-variable): Doc fix.
| -rw-r--r-- | lisp/cus-edit.el | 8 |
1 files changed, 2 insertions, 6 deletions
diff --git a/lisp/cus-edit.el b/lisp/cus-edit.el index c49328ac40d..d8fdf966374 100644 --- a/lisp/cus-edit.el +++ b/lisp/cus-edit.el | |||
| @@ -938,9 +938,6 @@ VALUE is a Lisp object. | |||
| 938 | If VARIABLE has a `custom-set' property, that is used for setting | 938 | If VARIABLE has a `custom-set' property, that is used for setting |
| 939 | VARIABLE, otherwise `set-default' is used. | 939 | VARIABLE, otherwise `set-default' is used. |
| 940 | 940 | ||
| 941 | The `customized-value' property of the VARIABLE will be set to a list | ||
| 942 | with a quoted VALUE as its sole list member. | ||
| 943 | |||
| 944 | If VARIABLE has a `variable-interactive' property, that is used as if | 941 | If VARIABLE has a `variable-interactive' property, that is used as if |
| 945 | it were the arg to `interactive' (which see) to interactively read the value. | 942 | it were the arg to `interactive' (which see) to interactively read the value. |
| 946 | 943 | ||
| @@ -971,9 +968,6 @@ Return VALUE. | |||
| 971 | If VARIABLE has a `custom-set' property, that is used for setting | 968 | If VARIABLE has a `custom-set' property, that is used for setting |
| 972 | VARIABLE, otherwise `set-default' is used. | 969 | VARIABLE, otherwise `set-default' is used. |
| 973 | 970 | ||
| 974 | The `customized-value' property of the VARIABLE will be set to a list | ||
| 975 | with a quoted VALUE as its sole list member. | ||
| 976 | |||
| 977 | If VARIABLE has a `variable-interactive' property, that is used as if | 971 | If VARIABLE has a `variable-interactive' property, that is used as if |
| 978 | it were the arg to `interactive' (which see) to interactively read the value. | 972 | it were the arg to `interactive' (which see) to interactively read the value. |
| 979 | 973 | ||
| @@ -993,6 +987,8 @@ If given a prefix (or a COMMENT argument), also prompt for a comment." | |||
| 993 | (comment | 987 | (comment |
| 994 | (put variable 'variable-comment comment) | 988 | (put variable 'variable-comment comment) |
| 995 | (put variable 'saved-variable-comment comment))) | 989 | (put variable 'saved-variable-comment comment))) |
| 990 | (put variable 'customized-value nil) | ||
| 991 | (put variable 'customized-variable-comment nil) | ||
| 996 | (custom-save-all) | 992 | (custom-save-all) |
| 997 | value) | 993 | value) |
| 998 | 994 | ||