Mercurial > emacs
changeset 32373:60c801b8bc10
(frame-set-background-mode):
Pay attention to saved face specs as well as default ones.
| author | Miles Bader <miles@gnu.org> |
|---|---|
| date | Wed, 11 Oct 2000 07:42:34 +0000 |
| parents | 1281dfa22cb3 |
| children | b2b4c0c23155 |
| files | lisp/faces.el |
| diffstat | 1 files changed, 2 insertions(+), 2 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/faces.el Wed Oct 11 01:23:36 2000 +0000 +++ b/lisp/faces.el Wed Oct 11 07:42:34 2000 +0000 @@ -1339,13 +1339,13 @@ (let ((face-list (face-list))) (while face-list (let* ((face (car face-list)) - (spec (get face 'face-defface-spec))) + (spec (or (get face 'saved-face) + (get face 'face-defface-spec)))) (when spec (face-spec-set face spec frame)) (setq face-list (cdr face-list)))))) - ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;; Frame creation.