diff options
| author | Graeme Geldenhuys <graeme@mastermaths.co.za> | 2010-03-09 11:19:33 +0200 |
|---|---|---|
| committer | Graeme Geldenhuys <graeme@mastermaths.co.za> | 2010-03-09 11:19:33 +0200 |
| commit | 7562545227ba1c1318320a69e6bb06dc740a2b77 (patch) | |
| tree | 65286ce630abb455cbda8f856cc9e456acaa84a9 /src | |
| parent | 11d086ff7b2972942a47ae13a48cac67b15bd19c (diff) | |
| download | fpGUI-7562545227ba1c1318320a69e6bb06dc740a2b77.tar.xz | |
X11: Now fontlist returns non-scaleable fonts too.
The old settings also caused applications to crash at startup. No idea why,
but the new settings prevent that and gives a true full list of available
fonts on the system.
Diffstat (limited to 'src')
| -rw-r--r-- | src/corelib/x11/fpg_x11.pas | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/src/corelib/x11/fpg_x11.pas b/src/corelib/x11/fpg_x11.pas index a5f37593..d0d16415 100644 --- a/src/corelib/x11/fpg_x11.pas +++ b/src/corelib/x11/fpg_x11.pas @@ -689,7 +689,8 @@ var s: string; pc: PChar; begin - pfs := XftListFonts(Display, DefaultScreen, [FC_SCALABLE, FcTypeBool, 1, 0, FC_FAMILY, 0]); + // this now even returns non-scaleable fonts which is what we sometimes want. + pfs := XftListFonts(Display, DefaultScreen, [0, FC_FAMILY, 0]); if pfs = nil then Exit; //==> |