--- a/hedgewars/uMisc.pas Tue Jan 12 07:32:15 2010 +0000
+++ b/hedgewars/uMisc.pas Wed Jan 13 09:41:35 2010 +0000
@@ -588,14 +588,17 @@
{$I-}
for i:= 0 to 7 do
begin
- assign(f,
-{$IFDEF IPHONEOS}
- string(IPH_getDocumentsPath())
+{$IFDEF IPHONEDBG}
+ f:= stderr;
{$ELSE}
- ParamStr(1)
+ assign(f,
+ {$IFDEF IPHONEOS}
+ string(IPH_getDocumentsPath())
+ {$ELSE}
+ ParamStr(1)
+ {$ENDIF}
+ + '/debug' + inttostr(i) + '.txt');
{$ENDIF}
- + '/debug' + inttostr(i) + '.txt');
-// f:= stderr;
rewrite(f);
if IOResult = 5 then
begin