(Finternal_set_lisp_face_attribute): Allow :color property

to be nil in a :box attribute value list; customize prints that
as lisp value when no box color is specified.

diff --git a/src/xfaces.c b/src/xfaces.c
index c562ce3..c02295c 100644 (file)
--- a/src/xfaces.c
+++ b/src/xfaces.c
@@ -4148,7 +4148,7 @@ FRAME 0 means change the face on all frames, and change the default
                }
              else if (EQ (k, QCcolor))
                {
-                 if (!STRINGP (v) || SCHARS (v) == 0)
+                 if (!NILP (v) && (!STRINGP (v) || SCHARS (v) == 0))
                    break;
                }
              else if (EQ (k, QCstyle))