# HG changeset patch
# User unc0rr
# Date 1244796620 0
# Node ID 3f1a19802d10144cb69a1d117a20eb89798a3fa5
# Parent  d897222d3339367b6c9bff5494f4d50394962d65
Fix r2201

diff -r d897222d3339 -r 3f1a19802d10 hedgewars/uMisc.pas
--- a/hedgewars/uMisc.pas	Fri Jun 12 08:47:05 2009 +0000
+++ b/hedgewars/uMisc.pas	Fri Jun 12 08:50:20 2009 +0000
@@ -536,10 +536,6 @@
 {$IFDEF DEBUGFILE}
 procedure AddFileLog(s: shortstring);
 begin
-{$IFDEF IPHONEOS}
-//we are not able (and it is useless) to write a file on device, so we will print on the computer console instead
-f:=stderr;
-{$ENDIF}
 writeln(f, GameTicks: 6, ': ', s);
 flush(f)
 end;
@@ -564,13 +560,13 @@
 
 {$IFDEF DEBUGFILE}
 {$I-}
-f:=stderr;
+f:= stderr;
 rewrite(f);
 {$IFNDEF IPHONEOS}
 if ParamCount <> 0 then
    for i:= 0 to 7 do
-    begin 
-	  assign(f, ParamStr(1) + '/debug' + inttostr(i) + '.txt');
+    begin
+      assign(f, ParamStr(1) + '/debug' + inttostr(i) + '.txt');
       rewrite(f);
       if IOResult = 0 then break
     end;