diff options
author | Richard M. Stallman <rms@gnu.org> | 1997-06-09 18:00:36 +0000 |
---|---|---|
committer | Richard M. Stallman <rms@gnu.org> | 1997-06-09 18:00:36 +0000 |
commit | dacc955ce6fc94400b19004a8594b893271be531 (patch) | |
tree | 91a8c29a5df3a57f9dc3c6e489682b95eb185f29 /src | |
parent | f39db7eaf4dc1554cc3a636f9315989f3d767e1b (diff) | |
download | emacs-dacc955ce6fc94400b19004a8594b893271be531.tar.gz |
(list_fontsets, fs_load_font): fast_c_string_match_ignore_case renamed.
Diffstat (limited to 'src')
-rw-r--r-- | src/fontset.c | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/src/fontset.c b/src/fontset.c index b0a6ed1fa8a..16fbf352887 100644 --- a/src/fontset.c +++ b/src/fontset.c @@ -205,7 +205,7 @@ fs_load_font (f, font_table, charset, fontname, fontset) elt = XCONS (list)->car; if (CONSP (elt) && STRINGP (XCONS (elt)->car) && CONSP (XCONS (elt)->cdr) - && (fast_string_match_ignore_case (XCONS (elt)->car, fontname) + && (fast_c_string_match_ignore_case (XCONS (elt)->car, fontname) >= 0)) { Lisp_Object tmp; @@ -228,7 +228,7 @@ fs_load_font (f, font_table, charset, fontname, fontset) elt = XCONS (list)->car; if (CONSP (elt) && STRINGP (XCONS (elt)->car) && VECTORP (XCONS (elt)->cdr) - && fast_string_match_ignore_case (XCONS (elt)->car, fontname) >= 0) + && fast_c_string_match_ignore_case (XCONS (elt)->car, fontname) >= 0) { fontp->font_encoder = (struct ccl_program *) xmalloc (sizeof (struct ccl_program)); @@ -465,8 +465,8 @@ just like X's font name matching algorithm allows.") Lisp_Object fontset_name = XCONS (XCONS (tem)->car)->car; if (!NILP (regexp)) { - if (fast_string_match_ignore_case (regexp, - XSTRING (fontset_name)->data) + if (fast_c_string_match_ignore_case (regexp, + XSTRING (fontset_name)->data) >= 0) return fontset_name; } @@ -507,7 +507,7 @@ list_fontsets (f, pattern, size) if (!NILP (regexp)) { - if (fast_string_match_ignore_case (regexp, fontsetp->name) >= 0) + if (fast_c_string_match_ignore_case (regexp, fontsetp->name) >= 0) name_matched = 1; } else |