hedgewars/uMisc.pas
changeset 3377 a3f0849f26bc
parent 3365 37ac593e9027
child 3381 f8800c44b3de
--- a/hedgewars/uMisc.pas	Thu Apr 29 17:21:10 2010 +0000
+++ b/hedgewars/uMisc.pas	Thu Apr 29 18:53:22 2010 +0000
@@ -768,7 +768,8 @@
 {$IFDEF DEBUGFILE}
 {$I-}
 {$IFDEF IPHONEOS}
-    f:= stderr;
+    Assign(f,'../Documents/debug.txt');
+    Rewrite(f);
 {$ELSE}
     if ParamStr(1) <> '' then
         begin