# HG changeset patch
# User Kenichi Handa <handa@m17n.org>
# Date 1161934633 0
# Node ID bbc1344cea0efc5c6c78cb5a6ac83d1c25f42c13
# Parent  5a93997128bf85570a6af1357a05abee6472f70d
(font_unparse_fcname): Pay attention to the case that
some of font property is a null string.

diff -r 5a93997128bf -r bbc1344cea0e src/font.c
--- a/src/font.c	Thu Oct 26 12:00:59 2006 +0000
+++ b/src/font.c	Fri Oct 27 07:37:13 2006 +0000
@@ -1324,7 +1324,7 @@
     p += sprintf (p, ":foundry=%s",
 		  SDATA (SYMBOL_NAME (AREF (font, FONT_FOUNDRY_INDEX))));
   for (i = 0; i < 3; i++)
-    if (! NILP (styles [i]))
+    if (SYMBOLP (styles[i]) && ! NILP (styles [i]))
       p += sprintf (p, ":%s=%s", style_names[i],
 		    SDATA (SYMBOL_NAME (styles [i])));
   if (dpi >= 0)