# HG changeset patch
# User Gerd Moellmann <gerd@gnu.org>
# Date 953726891 0
# Node ID 73181b84ea5778ecf21b49afaf9c60cdea751e49
# Parent  5fafac497e27626577c6baf1929f9d9b232aa4a1
(lface_same_font_attributes_p): Compare font attributes
as strings only if both are known to be strings.

diff -r 5fafac497e27 -r 73181b84ea57 src/xfaces.c
--- a/src/xfaces.c	Wed Mar 22 04:18:10 2000 +0000
+++ b/src/xfaces.c	Wed Mar 22 12:08:11 2000 +0000
@@ -4432,6 +4432,7 @@
 	  && EQ (lface1[LFACE_SLANT_INDEX], lface2[LFACE_SLANT_INDEX])
 	  && (EQ (lface1[LFACE_FONT_INDEX], lface2[LFACE_FONT_INDEX])
 	      || (STRINGP (lface1[LFACE_FONT_INDEX])
+		  && STRINGP (lface2[LFACE_FONT_INDEX])
 		  && xstricmp (XSTRING (lface1[LFACE_FONT_INDEX])->data,
 			       XSTRING (lface2[LFACE_FONT_INDEX])->data))));
 }