Mercurial > emacs

diff src/xfaces.c @ 60150:ffb5cb773521

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(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.
author Kim F. Storm <storm@cua.dk>
date Fri, 18 Feb 2005 22:55:53 +0000
parents 3590dd3050ba
children cffa9a821286 389421e988c2 bf0d492ea2d5
line wrap: on
line diff
--- a/src/xfaces.c	Fri Feb 18 22:55:37 2005 +0000
+++ b/src/xfaces.c	Fri Feb 18 22:55:53 2005 +0000
@@ -4148,7 +4148,7 @@
 		}
 	      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))