# HG changeset patch
# User Kenichi Handa <handa@m17n.org>
# Date 1210728429 0
# Node ID b9ffe341b5c8abd125fc6be2ab81e7f8b13b4f67
# Parent  a9ee82808208dd4a39c27efb1ef7cf575993434e
(internal_equal): Handle PREV_FONT.

diff -r a9ee82808208 -r b9ffe341b5c8 src/fns.c
--- a/src/fns.c	Wed May 14 01:26:46 2008 +0000
+++ b/src/fns.c	Wed May 14 01:27:09 2008 +0000
@@ -2207,12 +2207,13 @@
 	if (WINDOW_CONFIGURATIONP (o1))
 	  return compare_window_configurations (o1, o2, 0);
 
-	/* Aside from them, only true vectors, char-tables, and compiled
-	   functions are sensible to compare, so eliminate the others now.  */
+	/* Aside from them, only true vectors, char-tables, compiled
+	   functions, and fonts (font-spec, font-entity, font-ojbect)
+	   are sensible to compare, so eliminate the others now.  */
 	if (size & PSEUDOVECTOR_FLAG)
 	  {
 	    if (!(size & (PVEC_COMPILED
-			  | PVEC_CHAR_TABLE | PVEC_SUB_CHAR_TABLE)))
+			  | PVEC_CHAR_TABLE | PVEC_SUB_CHAR_TABLE | PVEC_FONT)))
 	      return 0;
 	    size &= PSEUDOVECTOR_SIZE_MASK;
 	  }