diff options
Diffstat (limited to 'src/corelib/x11')
-rw-r--r-- | src/corelib/x11/fpgfx_package.lpk | 6 | ||||
-rw-r--r-- | src/corelib/x11/fpgfx_package.pas | 2 | ||||
-rw-r--r-- | src/corelib/x11/gfx_x11.pas | 7 |
3 files changed, 9 insertions, 6 deletions
diff --git a/src/corelib/x11/fpgfx_package.lpk b/src/corelib/x11/fpgfx_package.lpk index 1521ea5a..77167bd2 100644 --- a/src/corelib/x11/fpgfx_package.lpk +++ b/src/corelib/x11/fpgfx_package.lpk @@ -24,7 +24,7 @@ <License Value="Modified LGPL "/> <Version Minor="5"/> - <Files Count="10"> + <Files Count="11"> <Item1> <Filename Value="x11_xft.pas"/> <UnitName Value="x11_xft"/> @@ -65,6 +65,10 @@ <Filename Value="../gfx_extinterpolation.pas"/> <UnitName Value="gfx_extinterpolation"/> </Item10> + <Item11> + <Filename Value="../gfx_cmdlineparams.pas"/> + <UnitName Value="gfx_cmdlineparams"/> + </Item11> </Files> <RequiredPkgs Count="1"> <Item1> diff --git a/src/corelib/x11/fpgfx_package.pas b/src/corelib/x11/fpgfx_package.pas index 0fc83352..7fa2a8c3 100644 --- a/src/corelib/x11/fpgfx_package.pas +++ b/src/corelib/x11/fpgfx_package.pas @@ -8,7 +8,7 @@ interface uses x11_xft, x11_keyconv, gfxbase, gfx_x11, fpgfx, gfx_stdimages, gfx_imgfmt_bmp, - gfx_widget, gfx_UTF8utils, gfx_extinterpolation; + gfx_widget, gfx_UTF8utils, gfx_extinterpolation, gfx_cmdlineparams; implementation diff --git a/src/corelib/x11/gfx_x11.pas b/src/corelib/x11/gfx_x11.pas index 1935ff57..35564db6 100644 --- a/src/corelib/x11/gfx_x11.pas +++ b/src/corelib/x11/gfx_x11.pas @@ -621,10 +621,9 @@ begin repeat if (atimeoutms >= 0) and (XPending(display) <= 0) then begin - // waiting some event for the given timeout - - // this Select handles only the first 256 file descriptors - // poll would be better but FPC has no official poll interface (if I'm right) + // Some event is waiting for the given timeout. + // This Select handles only the first 256 file descriptors. + // Poll would be better but FPC has no official poll interface (if I'm right) fpFD_ZERO(rfds); fpFD_SET(xfd, rfds); r := fpSelect(xfd + 1, @rfds, nil, nil, atimeoutms); |