Mercurial > emacs
comparison src/xfont.c @ 95222:005a1655f51e
* dispextern.h, xfaces.c (xstrcasecmp): Renamed from xstricmp.
* dosfns.c, fileio.c, font.c, fontset.c, image.c, macfns.c:
* macterm.c, process.c, w32.c, w32fns.c, w32proc.c, xfaces.c:
* xfns.c, xfont.c: Callers changed.
| author | Jason Rumney <jasonr@gnu.org> |
|---|---|
| date | Thu, 22 May 2008 14:54:27 +0000 |
| parents | 55ae253968bc |
| children | 6df485632f28 |
comparison
equal
deleted
inserted
replaced
| 95221:063d15c54b69 | 95222:005a1655f51e |
|---|---|
| 204 extern Lisp_Object Vface_alternative_font_registry_alist; | 204 extern Lisp_Object Vface_alternative_font_registry_alist; |
| 205 | 205 |
| 206 static int | 206 static int |
| 207 compare_font_names (const void *name1, const void *name2) | 207 compare_font_names (const void *name1, const void *name2) |
| 208 { | 208 { |
| 209 return xstricmp (*(const char **) name1, *(const char **) name2); | 209 return xstrcasecmp (*(const char **) name1, *(const char **) name2); |
| 210 } | 210 } |
| 211 | 211 |
| 212 static Lisp_Object xfont_list_pattern P_ ((Lisp_Object, Display *, char *)); | 212 static Lisp_Object xfont_list_pattern P_ ((Lisp_Object, Display *, char *)); |
| 213 | 213 |
| 214 static Lisp_Object | 214 static Lisp_Object |
| 251 for (i = 0; i < num_fonts; i++) | 251 for (i = 0; i < num_fonts; i++) |
| 252 { | 252 { |
| 253 Lisp_Object entity; | 253 Lisp_Object entity; |
| 254 int result; | 254 int result; |
| 255 | 255 |
| 256 if (i > 0 && xstricmp (indices[i - 1], indices[i]) == 0) | 256 if (i > 0 && xstrcasecmp (indices[i - 1], indices[i]) == 0) |
| 257 continue; | 257 continue; |
| 258 | 258 |
| 259 entity = font_make_entity (); | 259 entity = font_make_entity (); |
| 260 ASET (entity, FONT_TYPE_INDEX, Qx); | 260 ASET (entity, FONT_TYPE_INDEX, Qx); |
| 261 | 261 |