Skip to content
GitLab
Projects
Groups
Snippets
Help
Loading...
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Open sidebar
emacs
emacs
Commits
5d3f7fd8
Commit
5d3f7fd8
authored
May 22, 2008
by
Jason Rumney
Browse files
(font_style_to_value, font_score): Use xstricmp.
parent
28f4e99c
Changes
1
Hide whitespace changes
Inline
Side-by-side
Showing
1 changed file
with
4 additions
and
4 deletions
+4
-4
src/font.c
src/font.c
+4
-4
No files found.
src/font.c
View file @
5d3f7fd8
...
...
@@ -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
(
str
case
cmp
(
s
,
(
char
*
)
SDATA
(
SYMBOL_NAME
(
elt
)))
==
0
)
if
(
x
str
i
cmp
(
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
(
str
case
cmp
((
char
*
)
SDATA
(
spec_str
),
(
char
*
)
SDATA
(
entity_str
)))
if
(
x
str
i
cmp
((
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
(
str
case
cmp
((
char
*
)
SDATA
(
spec_str
),
(
char
*
)
SDATA
(
entity_str
))
==
0
)
if
(
x
str
i
cmp
((
char
*
)
SDATA
(
spec_str
),
(
char
*
)
SDATA
(
entity_str
))
==
0
)
break
;
}
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment