aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--lisp/faces.el5
1 files changed, 3 insertions, 2 deletions
diff --git a/lisp/faces.el b/lisp/faces.el
index 5537fbef6c3..302cf6c02d8 100644
--- a/lisp/faces.el
+++ b/lisp/faces.el
@@ -1506,8 +1506,9 @@ This applies the defface/custom spec first, then the custom theme specs,
1506then the override spec." 1506then the override spec."
1507 (face-spec-reset-face face frame) 1507 (face-spec-reset-face face frame)
1508 (let ((face-sym (or (get face 'face-alias) face))) 1508 (let ((face-sym (or (get face 'face-alias) face)))
1509 (face-spec-set-2 face frame 1509 (or (get face 'customized-face)
1510 (face-user-default-spec face)) 1510 (get face 'saved-face)
1511 (face-spec-set-2 face frame (face-default-spec face)))
1511 (let ((theme-faces (reverse (get face-sym 'theme-face)))) 1512 (let ((theme-faces (reverse (get face-sym 'theme-face))))
1512 (dolist (spec theme-faces) 1513 (dolist (spec theme-faces)
1513 (face-spec-set-2 face frame (cadr spec)))) 1514 (face-spec-set-2 face frame (cadr spec))))