aboutsummaryrefslogtreecommitdiffstats
path: root/src/fontset.c
diff options
context:
space:
mode:
authorMiles Bader2004-10-22 10:13:52 +0000
committerMiles Bader2004-10-22 10:13:52 +0000
commit5ea24f9468ea9fb01253a98343a67fdb74d1817e (patch)
tree434ee6dc5f051d6deaf0c357b97b656d16e4ed12 /src/fontset.c
parent56c68b971d6f7665dd035df1ff302d794c0f294a (diff)
parentd5ddd795bdab373fe62ccfd099c270fd97da0964 (diff)
downloademacs-5ea24f9468ea9fb01253a98343a67fdb74d1817e.tar.gz
emacs-5ea24f9468ea9fb01253a98343a67fdb74d1817e.zip
Revision: miles@gnu.org--gnu-2004/emacs--unicode--0--patch-62
Merge from emacs--cvs-trunk--0 Patches applied: * miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-616 - miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-620 Update from CVS * miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-621 Merge from gnus--rel--5.10 * miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-622 - miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-625 Update from CVS * miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-626 Merge from gnus--rel--5.10 * miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-627 Update from CVS * miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-628 Merge from gnus--rel--5.10 * miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-629 - miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-630 Update from CVS * miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-631 Merge from gnus--rel--5.10 * miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-632 Update from CVS * miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-633 Merge from gnus--rel--5.10 * miles@gnu.org--gnu-2004/gnus--rel--5.10--patch-51 - miles@gnu.org--gnu-2004/gnus--rel--5.10--patch-52 Update from CVS * miles@gnu.org--gnu-2004/gnus--rel--5.10--patch-53 Merge from emacs--cvs-trunk--0 * miles@gnu.org--gnu-2004/gnus--rel--5.10--patch-54 - miles@gnu.org--gnu-2004/gnus--rel--5.10--patch-55 Update from CVS * miles@gnu.org--gnu-2004/gnus--rel--5.10--patch-56 Update from CVS: Add lisp/legacy-gnus-agent.el * miles@gnu.org--gnu-2004/gnus--rel--5.10--patch-57 - miles@gnu.org--gnu-2004/gnus--rel--5.10--patch-58 Update from CVS
Diffstat (limited to 'src/fontset.c')
-rw-r--r--src/fontset.c18
1 files changed, 8 insertions, 10 deletions
diff --git a/src/fontset.c b/src/fontset.c
index 4901fc71419..289f5368a35 100644
--- a/src/fontset.c
+++ b/src/fontset.c
@@ -1126,18 +1126,17 @@ fs_query_fontset (name, regexpp)
1126 1126
1127 for (i = 0; i < ASIZE (Vfontset_table); i++) 1127 for (i = 0; i < ASIZE (Vfontset_table); i++)
1128 { 1128 {
1129 Lisp_Object fontset; 1129 Lisp_Object fontset, this_name;
1130 unsigned char *this_name;
1131 1130
1132 fontset = FONTSET_FROM_ID (i); 1131 fontset = FONTSET_FROM_ID (i);
1133 if (NILP (fontset) 1132 if (NILP (fontset)
1134 || !BASE_FONTSET_P (fontset)) 1133 || !BASE_FONTSET_P (fontset))
1135 continue; 1134 continue;
1136 1135
1137 this_name = SDATA (FONTSET_NAME (fontset)); 1136 this_name = FONTSET_NAME (fontset);
1138 if (regexpp 1137 if (regexpp
1139 ? fast_c_string_match_ignore_case (name, this_name) >= 0 1138 ? fast_string_match (name, this_name) >= 0
1140 : !strcmp (SDATA (name), this_name)) 1139 : !strcmp (SDATA (name), SDATA (this_name)))
1141 return i; 1140 return i;
1142 } 1141 }
1143 return -1; 1142 return -1;
@@ -1189,19 +1188,18 @@ list_fontsets (f, pattern, size)
1189 1188
1190 for (id = 0; id < ASIZE (Vfontset_table); id++) 1189 for (id = 0; id < ASIZE (Vfontset_table); id++)
1191 { 1190 {
1192 Lisp_Object fontset; 1191 Lisp_Object fontset, name;
1193 unsigned char *name;
1194 1192
1195 fontset = FONTSET_FROM_ID (id); 1193 fontset = FONTSET_FROM_ID (id);
1196 if (NILP (fontset) 1194 if (NILP (fontset)
1197 || !BASE_FONTSET_P (fontset) 1195 || !BASE_FONTSET_P (fontset)
1198 || !EQ (frame, FONTSET_FRAME (fontset))) 1196 || !EQ (frame, FONTSET_FRAME (fontset)))
1199 continue; 1197 continue;
1200 name = SDATA (FONTSET_NAME (fontset)); 1198 name = FONTSET_NAME (fontset);
1201 1199
1202 if (STRINGP (regexp) 1200 if (STRINGP (regexp)
1203 ? (fast_c_string_match_ignore_case (regexp, name) < 0) 1201 ? (fast_string_match (regexp, name) < 0)
1204 : strcmp (SDATA (pattern), name)) 1202 : strcmp (SDATA (pattern), SDATA (name)))
1205 continue; 1203 continue;
1206 1204
1207 val = Fcons (Fcopy_sequence (FONTSET_NAME (fontset)), val); 1205 val = Fcons (Fcopy_sequence (FONTSET_NAME (fontset)), val);