mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-15 10:30:25 -08:00
Code Issues Projects Releases Wiki Activity

* cus-edit.el (custom-save-variables): Allow unthemed values.

Browse source
This commit is contained in:
Chong Yidong 2006-02-19 15:50:09 +00:00
parent 4f2f32146a
commit 2d656942f6
2 changed files with 7 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

4
lisp/cus-edit.el
View file

@ -4166,7 +4166,9 @@ This function does not save the buffer."
(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)