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

[Chong Yidong]

Index: emacs/lisp/custom.el
diff -u emacs/lisp/custom.el:1.122 emacs/lisp/custom.el:1.123
--- emacs/lisp/custom.el:1.122  Mon Feb 20 15:59:51 2006
+++ emacs/lisp/custom.el        Tue Mar 21 16:44:09 2006
@@ -819,7 +819,8 @@
                         (not (equal (eval (car (get symbol 'standard-value)))
                                     (symbol-value symbol)))))
                (setq old (list (list 'changed (symbol-value symbol))))
-             (if (facep symbol)
+             (if (and (facep symbol)
+                      (not (face-spec-match-p symbol (get symbol 
'face-defface-spec))))
                  (setq old (list (list 'changed (list
                    (append '(t) (custom-face-attributes-get symbol nil)))))))))
        (put symbol prop (cons (list theme value) old))