aboutsummaryrefslogtreecommitdiffstats
path: root/Game
diff options
context:
space:
mode:
Diffstat (limited to '')
-rw-r--r--Game/Code/Classes/UPlatformLinux.pas27
1 files changed, 14 insertions, 13 deletions
diff --git a/Game/Code/Classes/UPlatformLinux.pas b/Game/Code/Classes/UPlatformLinux.pas
index b323c608..985f9db1 100644
--- a/Game/Code/Classes/UPlatformLinux.pas
+++ b/Game/Code/Classes/UPlatformLinux.pas
@@ -13,17 +13,18 @@ uses Classes, UPlatform;
type
TPlatformLinux = class(TInterfacedObject, IPlatform)
- function get_homedir(): string;
- public
- function DirectoryFindFiles(Dir, Filter : WideString; ReturnAllSubDirs : Boolean) : TDirectoryEntryArray;
- function TerminateIfAlreadyRunning(var WndTitle : String) : Boolean;
- function FindSongFile(Dir, Mask: widestring): widestring;
-
- procedure Halt;
-
- function GetLogPath : WideString;
- function GetGameSharedPath : WideString;
- function GetGameUserPath : WideString;
+ private
+ function GetHomedir(): string;
+ public
+ function DirectoryFindFiles(Dir, Filter : WideString; ReturnAllSubDirs : Boolean) : TDirectoryEntryArray;
+ function TerminateIfAlreadyRunning(var WndTitle : String) : Boolean;
+ function FindSongFile(Dir, Mask: widestring): widestring;
+
+ procedure Halt;
+
+ function GetLogPath : WideString;
+ function GetGameSharedPath : WideString;
+ function GetGameUserPath : WideString;
end;
implementation
@@ -37,7 +38,7 @@ implementation
uses
libc,
- uCommandLine,
+ UCommandLine,
BaseUnix,
SysUtils,
ULog,
@@ -132,7 +133,7 @@ begin
end;
end;
-function TPlatformLinux.get_homedir(): string;
+function TPlatformLinux.GetHomedir(): string;
var
pPasswdEntry : Ppasswd;
lUserName : String;