From 5d3f7fd8723617424e1d34df4cd02e4dc24db5fc Mon Sep 17 00:00:00 2001 From: Jason Rumney Date: Thu, 22 May 2008 13:36:30 +0000 Subject: [PATCH] (font_style_to_value, font_score): Use xstricmp. --- src/font.c | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) diff --git a/src/font.c b/src/font.c index 84f2a2ac867..11be9856512 100644 --- a/src/font.c +++ b/src/font.c @@ -312,7 +312,7 @@ font_style_to_value (prop, val, noerror) for (j = 1; j < ASIZE (AREF (table, i)); j++) { elt = AREF (AREF (table, i), j); - if (strcasecmp (s, (char *) SDATA (SYMBOL_NAME (elt))) == 0) + if (xstricmp (s, (char *) SDATA (SYMBOL_NAME (elt))) == 0) return ((XINT (AREF (AREF (table, i), 0)) << 8) | (i << 4) | (j - 1)); } @@ -1981,7 +1981,7 @@ font_score (entity, spec_prop, alternate_families) Lisp_Object entity_str = SYMBOL_NAME (AREF (entity, i)); Lisp_Object spec_str = SYMBOL_NAME (spec_prop[i]); - if (strcasecmp ((char *) SDATA (spec_str), (char *) SDATA (entity_str))) + if (xstricmp ((char *) SDATA (spec_str), (char *) SDATA (entity_str))) { if (i == FONT_FAMILY_INDEX && CONSP (alternate_families)) { @@ -1991,8 +1991,8 @@ font_score (entity, spec_prop, alternate_families) j++, alternate_families = XCDR (alternate_families)) { spec_str = XCAR (alternate_families); - if (strcasecmp ((char *) SDATA (spec_str), - (char *) SDATA (entity_str)) == 0) + if (xstricmp ((char *) SDATA (spec_str), + (char *) SDATA (entity_str)) == 0) break; } -- 2.39.5