# HG changeset patch
# User Kenichi Handa <handa@m17n.org>
# Date 1164802196 0
# Node ID a1cd7344d6a25004c62423484fa259208c696922
# Parent  6485184943841b0c881e178b7bdc8359c33ecc60
(font_parse_xlfd): Fix the array size of `f'.
(register_font_driver): Use EQ to compare driver->type.

diff -r 648518494384 -r a1cd7344d6a2 src/font.c
--- a/src/font.c	Wed Nov 29 08:15:46 2006 +0000
+++ b/src/font.c	Wed Nov 29 12:09:56 2006 +0000
@@ -751,7 +751,7 @@
   int i, j;
   Lisp_Object dpi, spacing;
   int avgwidth;
-  char *f[XLFD_LAST_INDEX];
+  char *f[XLFD_LAST_INDEX + 1];
   Lisp_Object val;
   char *p;
 
@@ -2808,7 +2808,7 @@
 	   SDATA (SYMBOL_NAME (driver->type)));
 
   for (prev = NULL, list = root; list; prev = list, list = list->next)
-    if (list->driver->type == driver->type)
+    if (EQ (list->driver->type, driver->type))
       error ("Duplicated font driver: %s", SDATA (SYMBOL_NAME (driver->type)));
 
   list = malloc (sizeof (struct font_driver_list));