scsh-conservatory
/
scx
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

+ fixed scx_XftPatternGet()

This commit is contained in:
eknauel 2003-10-25 13:47:23 +00:00
parent 6fa50d8c3d
commit a11b31a92f
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
c/libs/xft.c
View File

@ -62,13 +62,13 @@ s48_value scx_XftPatternGet(s48_value sxp, s48_value sobj, s48_value sid)
tbl = lookup_pattern_property_by_id(obj); tbl = lookup_pattern_property_by_id(obj);
rc = XftPatternGet(p, tbl->name, i, &v); rc = XftPatternGet(p, tbl->name, i, &v);
if ((rc != XftResultMatch) || (rc != XftResultNoMatch)) if (rc != XftResultMatch)
{ {
rl = s48_list_2(s48_enter_integer(rc), S48_UNSPECIFIC); rl = s48_list_2(s48_enter_integer(rc), S48_UNSPECIFIC);
S48_GC_UNPROTECT(); S48_GC_UNPROTECT();
return rl; return rl;
} }
switch (tbl->type) { switch (tbl->type) {
case SCX_XFT_STRING: case SCX_XFT_STRING:
rv = s48_enter_string(v.u.s); rv = s48_enter_string(v.u.s);