summaryrefslogtreecommitdiff
path: root/src/corelib/x11/gfx_x11.pas
diff options
context:
space:
mode:
Diffstat (limited to 'src/corelib/x11/gfx_x11.pas')
-rw-r--r--src/corelib/x11/gfx_x11.pas5
1 files changed, 3 insertions, 2 deletions
diff --git a/src/corelib/x11/gfx_x11.pas b/src/corelib/x11/gfx_x11.pas
index f32b645d..938a12cb 100644
--- a/src/corelib/x11/gfx_x11.pas
+++ b/src/corelib/x11/gfx_x11.pas
@@ -234,7 +234,7 @@ type
FLastKeySym: TKeySym; // Used for KeyRelease event
function DoGetFontFaceList: TStringList; override;
public
- constructor Create(const aparams: string); override;
+ constructor Create(const AParams: string); override;
destructor Destroy; override;
function DoMessagesPending: boolean;
procedure DoWaitWindowMessage(atimeoutms: integer);
@@ -684,8 +684,9 @@ begin
Result.Sort;
end;
-constructor TfpgApplicationImpl.Create(const aparams: string);
+constructor TfpgApplicationImpl.Create(const AParams: string);
begin
+ inherited Create(AParams);
FIsInitialized := False;
FDisplay := XOpenDisplay(PChar(aparams));