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

ATTRS is non-nil.

diff --git a/lisp/faces.el b/lisp/faces.el
index 942debc106e5631b345aff38740804369a939b4b..e1eedb84dd8ad319f99e7ea4c7997bd3df2f070d 100644 (file)
--- a/lisp/faces.el
+++ b/lisp/faces.el
@@ -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))))