Added the new GetxxxxPath functions for OS X.

git-svn-id: svn://svn.code.sf.net/p/ultrastardx/svn/trunk@764 b956fd51-792f-4845-bead-9b4dfca2ff2c

1 files changed, 19 insertions, 2 deletions

diff --git a/Game/Code/Classes/UPlatformMacOSX.pas b/Game/Code/Classes/UPlatformMacOSX.pas
index 4e0c9061..ff369049 100644
--- a/Game/Code/Classes/UPlatformMacOSX.pas
+++ b/Game/Code/Classes/UPlatformMacOSX.pas
@@ -16,7 +16,9 @@ type
   private
   public
     Function DirectoryFindFiles(Dir, Filter : WideString; ReturnAllSubDirs : Boolean) : TDirectoryEntryArray; override;
-    function GetGamePath: WideString; override;
+    function GetLogPath        : WideString; override;
+    function GetGameSharedPath : WideString; override;
+    function GetGameUserPath   : WideString; override;
   end;
 
 implementation
@@ -26,7 +28,7 @@ uses SysUtils, baseunix;
 // Mac applications are packaged in directories.
 // We have to cut the last two directories
 // to get the application directory.
-Function TPlatformMacOSX.GetGamePath : WideString;
+Function GetBundlePath : WideString;
 var
 	x,
 	i : integer;
@@ -41,6 +43,21 @@ begin
   end;
 end;
 
+function TPlatformMacOSX.GetLogPath        : WideString;
+begin
+  Result := GetBundlePath;
+end;
+
+function TPlatformMacOSX.GetGameSharedPath : WideString;
+begin
+  Result := GetBundlePath;
+end;
+
+function TPlatformMacOSX.GetGameUserPath   : WideString;
+begin
+  Result := GetBundlePath;
+end;
+
 Function TPlatformMacOSX.DirectoryFindFiles(Dir, Filter : WideString; ReturnAllSubDirs : Boolean) : TDirectoryEntryArray;
 var
     i : Integer;