mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-12-26 10:49:33 +00:00
Code Issues Releases Activity

(face-spec-set): Only face-spec-reset-face when

Browse Source 
ATTRS is non-nil.
This commit is contained in:
Gerd Moellmann 2000-09-08 13:51:08 +00:00
parent 326cdd749d
commit 10ab7a5122
1 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
lisp/faces.el
View File

@ -1174,7 +1174,8 @@ If FRAME is nil, the current FRAME is used."
FRAME is the frame whose frame-local face is set. FRAME nil means
do it on all frames. See `defface' for information about SPEC."
(let ((attrs (face-spec-choose spec frame)))
(face-spec-reset-face face frame)
(when attrs
(face-spec-reset-face face frame))
(while attrs
(let ((attribute (car attrs))
(value (car (cdr attrs))))