Mercurial > emacs
changeset 24579:82cf6c4c1e03
(face-set-after-frame-default): Obey the
`customized-face' for new faces.
author | Richard M. Stallman <rms@gnu.org> |
---|---|
date | Tue, 06 Apr 1999 20:04:27 +0000 |
parents | 9bd8fd06673b |
children | 2d0999df43c7 |
files | lisp/faces.el |
diffstat | 1 files changed, 2 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/faces.el Tue Apr 06 20:02:45 1999 +0000 +++ b/lisp/faces.el Tue Apr 06 20:04:27 1999 +0000 @@ -1443,7 +1443,8 @@ ;; Set up each face, first from the defface information, ;; then the global face data, and then the X resources. (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))) (global (cdr (assq face global-face-data))) (local (cdr (car rest))))