[Emacs-diffs] Changes to emacs/lisp/cus-edit.el

[Chong Yidong]

Index: emacs/lisp/cus-edit.el
diff -u emacs/lisp/cus-edit.el:1.284 emacs/lisp/cus-edit.el:1.285
--- emacs/lisp/cus-edit.el:1.284        Wed Feb 15 02:43:55 2006
+++ emacs/lisp/cus-edit.el      Sun Feb 19 15:50:09 2006
@@ -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)