--- a/hedgewars/uMisc.pas Sun May 02 20:30:23 2010 +0000
+++ b/hedgewars/uMisc.pas Sun May 02 22:00:50 2010 +0000
@@ -170,7 +170,7 @@
{$ENDIF}
implementation
-uses Math, uConsole, uStore, uIO, uRandom, uSound, typinfo;
+uses Math, uConsole, uStore, uIO, uSound, typinfo;
var KBnum: Longword;
{$IFDEF DEBUGFILE}
@@ -246,14 +246,15 @@
procedure OutError(Msg: shortstring; isFatalError: boolean);
begin
-{$IFDEF DEBUGFILE}AddFileLog(Msg);{$ENDIF}
+// obsolete? written in WriteLnToConsole() anyway
+// {$IFDEF DEBUGFILE}AddFileLog(Msg);{$ENDIF}
WriteLnToConsole(Msg);
if isFatalError then
-begin
-SendIPC('E' + GetLastConsoleLine);
-SDL_Quit;
-halt(1)
-end
+ begin
+ SendIPC('E' + GetLastConsoleLine);
+ SDL_Quit;
+ halt(1)
+ end
end;
procedure TryDo(Assert: boolean; Msg: shortstring; isFatal: boolean);