Mercurial > emacs
changeset 69004:f4a06252f47c
* cus-edit.el (custom-save-variables): Allow unthemed values.
| author | Chong Yidong <cyd@stupidchicken.com> |
|---|---|
| date | Sun, 19 Feb 2006 15:50:09 +0000 |
| parents | 778b71fe14ef |
| children | 652517eb2b23 |
| files | lisp/ChangeLog lisp/cus-edit.el |
| diffstat | 2 files changed, 7 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/ChangeLog Sun Feb 19 07:33:40 2006 +0000 +++ b/lisp/ChangeLog Sun Feb 19 15:50:09 2006 +0000 @@ -1,3 +1,7 @@ +2006-02-19 Chong Yidong <cyd@stupidchicken.com> + + * cus-edit.el (custom-save-variables): Allow unthemed values. + 2006-02-19 Nick Roberts <nickrob@snap.net.nz> * progmodes/gud.el: Don't require font-lock as it's now
--- a/lisp/cus-edit.el Sun Feb 19 07:33:40 2006 +0000 +++ b/lisp/cus-edit.el Sun Feb 19 15:50:09 2006 +0000 @@ -4166,7 +4166,9 @@ (mapatoms (lambda (symbol) (if (and (get symbol 'saved-value) - (eq 'user (car (car-safe (get symbol 'theme-value))))) + ;; ignore theme values + (or (null (get symbol 'theme-value)) + (eq 'user (caar (get symbol 'theme-value))))) (nconc saved-list (list symbol))))) (setq saved-list (sort (cdr saved-list) 'string<)) (unless (bolp)