hedgewars/uPhysFSLayer.pas
changeset 13506 36f3f77e9b1b
parent 12122 cc2d2f910d5a
child 13922 3a0d09a31f5f
equal deleted inserted replaced
13505:69f0f437c75a 13506:36f3f77e9b1b
   200 {$IFNDEF MOBILE}
   200 {$IFNDEF MOBILE}
   201     fp: PChar;
   201     fp: PChar;
   202 {$ENDIF}
   202 {$ENDIF}
   203 begin
   203 begin
   204 {$IFDEF HWLIBRARY}
   204 {$IFDEF HWLIBRARY}
   205     //TODO: http://icculus.org/pipermail/physfs/2011-August/001006.html
   205     //TODO: https://icculus.org/pipermail/physfs/2011-August/001006.html
   206     cPhysfsId:= shortstring(GetCurrentDir()) + {$IFDEF DARWIN}{$IFNDEF IPHONEOS}'/Hedgewars.app/Contents/MacOS/' + {$ENDIF}{$ENDIF} ' hedgewars';
   206     cPhysfsId:= shortstring(GetCurrentDir()) + {$IFDEF DARWIN}{$IFNDEF IPHONEOS}'/Hedgewars.app/Contents/MacOS/' + {$ENDIF}{$ENDIF} ' hedgewars';
   207 {$ELSE}
   207 {$ELSE}
   208     cPhysfsId:= ParamStr(0);
   208     cPhysfsId:= ParamStr(0);
   209 {$ENDIF}
   209 {$ENDIF}
   210 
   210