Mercurial > emacs

changeset 31500:33b9a5b2a3bc

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(face-spec-set): Only face-spec-reset-face when ATTRS is non-nil.
author Gerd Moellmann <gerd@gnu.org>
date Fri, 08 Sep 2000 13:51:08 +0000
parents 3bc3df2053c4
children 735123628126
files lisp/faces.el
diffstat 1 files changed, 2 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/faces.el	Fri Sep 08 13:49:15 2000 +0000
+++ b/lisp/faces.el	Fri Sep 08 13:51:08 2000 +0000
@@ -1174,7 +1174,8 @@
 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))))