fixed the calls to XListFonts, XListFontsWithInfo.
This commit is contained in:
parent
024abcc745
commit
2c8bb6981f
|
@ -60,10 +60,10 @@ s48_value scx_List_Font_Names(s48_value Xdisplay, s48_value pattern) {
|
||||||
s48_value v = S48_FALSE;
|
s48_value v = S48_FALSE;
|
||||||
S48_DECLARE_GC_PROTECT(1);
|
S48_DECLARE_GC_PROTECT(1);
|
||||||
|
|
||||||
XListFonts(SCX_EXTRACT_DISPLAY(Xdisplay),
|
sa = XListFonts(SCX_EXTRACT_DISPLAY(Xdisplay),
|
||||||
s48_extract_string(pattern),
|
s48_extract_string(pattern),
|
||||||
65535,
|
65535,
|
||||||
&n);
|
&n);
|
||||||
|
|
||||||
v = s48_make_vector(n, S48_FALSE);
|
v = s48_make_vector(n, S48_FALSE);
|
||||||
S48_GC_PROTECT_1(v);
|
S48_GC_PROTECT_1(v);
|
||||||
|
@ -83,11 +83,11 @@ s48_value scx_List_Fonts(s48_value Xdisplay, s48_value pattern) {
|
||||||
s48_value v = S48_FALSE;
|
s48_value v = S48_FALSE;
|
||||||
S48_DECLARE_GC_PROTECT(1);
|
S48_DECLARE_GC_PROTECT(1);
|
||||||
|
|
||||||
XListFontsWithInfo(SCX_EXTRACT_DISPLAY(Xdisplay),
|
sa = XListFontsWithInfo(SCX_EXTRACT_DISPLAY(Xdisplay),
|
||||||
s48_extract_string(pattern),
|
s48_extract_string(pattern),
|
||||||
65535,
|
65535,
|
||||||
&n,
|
&n,
|
||||||
&fsa);
|
&fsa);
|
||||||
|
|
||||||
v = s48_make_vector(n, S48_FALSE);
|
v = s48_make_vector(n, S48_FALSE);
|
||||||
S48_GC_PROTECT_1(v);
|
S48_GC_PROTECT_1(v);
|
||||||
|
|
Loading…
Reference in New Issue