mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-12-02 08:22:22 +00:00
Code Issues Releases Activity

Fix custom-variable-reset-backup's use of customized-value property.

Browse Source 
* cus-edit.el (custom-variable-reset-backup): Quote the value
before storing it in the customized-value property.

Fixes: debbugs:6712
This commit is contained in:
Chong Yidong 2012-02-05 23:50:36 +08:00
parent aa4589a7cf
commit 5c2a252fad
2 changed files with 4 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
lisp/ChangeLog
View File

@ -1,5 +1,8 @@
2012-02-05 Chong Yidong <cyd@gnu.org> 2012-02-05 Chong Yidong <cyd@gnu.org>
* cus-edit.el (custom-variable-reset-backup): Quote the value
before storing it in the customized-value property (Bug#6712).
* wid-edit.el (widget-field-value-get): New optional arg to * wid-edit.el (widget-field-value-get): New optional arg to
suppress trailing whitespace truncation. suppress trailing whitespace truncation.
(character): Use it (Bug#2689). (character): Use it (Bug#2689).

2
lisp/cus-edit.el
View File

@ -3071,7 +3071,7 @@ to switch between two values."
(funcall set symbol (car value)) (funcall set symbol (car value))
(error nil))) (error nil)))
(error "No backup value for %s" symbol)) (error "No backup value for %s" symbol))
(put symbol 'customized-value (list (car value))) (put symbol 'customized-value (list (custom-quote (car value))))
(put symbol 'variable-comment comment) (put symbol 'variable-comment comment)
(put symbol 'customized-variable-comment comment) (put symbol 'customized-variable-comment comment)
(custom-variable-state-set widget) (custom-variable-state-set widget)