(xfont_list_pattern, compare_font_names): Use xstricmp.

diff --git a/src/xfont.c b/src/xfont.c
index e9e42e134be3efe47e23721248eb111e6ff2cdb3..af2665c567ef3a3cd6bf6d77362dbacd26caae2d 100644 (file)
--- a/src/xfont.c
+++ b/src/xfont.c
@@ -206,7 +206,7 @@ extern Lisp_Object Vface_alternative_font_registry_alist;
 static int
 compare_font_names (const void *name1, const void *name2)
 {
-  return strcasecmp (*(const char **) name1, *(const char **) name2);
+  return xstricmp (*(const char **) name1, *(const char **) name2);
 }
 
 static Lisp_Object xfont_list_pattern P_ ((Lisp_Object, Display *, char *));
@@ -253,7 +253,7 @@ xfont_list_pattern (frame, display, pattern)
          Lisp_Object entity;
          int result;
 
-         if (i > 0 && strcasecmp (indices[i - 1], indices[i]) == 0)
+         if (i > 0 && xstricmp (indices[i - 1], indices[i]) == 0)
            continue;
 
          entity = font_make_entity ();