oops. no need to (re)open stderr I guess
authorsheepluva
Sat, 29 Nov 2014 17:33:51 +0100
changeset 10574 1636b0efa415
parent 10573 3b82b4d90eb7
child 10575 13b1e9008f4b
oops. no need to (re)open stderr I guess
hedgewars/uUtils.pas
--- a/hedgewars/uUtils.pas	Sat Nov 29 15:38:28 2014 +0100
+++ b/hedgewars/uUtils.pas	Sat Nov 29 17:33:51 2014 +0100
@@ -558,11 +558,9 @@
         end;
 
 {$IFNDEF PAS2C}
+    // if everything fails, write to stderr
     if (length(UserPathPrefix) = 0) or (IOResult = 0) then
-        begin
-        logFile:= stderr; // if everything fails, write to stderr
-        Rewrite(logFile);
-        end;
+        logFile:= stderr;
 {$ENDIF}
 {$I+}
 {$ENDIF}