Commit acc9e99d authored by Richard M. Stallman's avatar Richard M. Stallman
Browse files

(face-set-after-frame-default): Obey the

`customized-face' for new faces.
parent fdc5fa25
...@@ -1443,7 +1443,8 @@ If FRAME is nil, the current FRAME is used." ...@@ -1443,7 +1443,8 @@ If FRAME is nil, the current FRAME is used."
;; Set up each face, first from the defface information, ;; Set up each face, first from the defface information,
;; then the global face data, and then the X resources. ;; then the global face data, and then the X resources.
(let* ((face (car (car rest))) (let* ((face (car (car rest)))
(spec (or (get face 'saved-face) (spec (or (get face 'customized-face)
(get face 'saved-face)
(get face 'face-defface-spec))) (get face 'face-defface-spec)))
(global (cdr (assq face global-face-data))) (global (cdr (assq face global-face-data)))
(local (cdr (car rest)))) (local (cdr (car rest))))
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment