hedgewars/uMisc.pas
changeset 43 e297fea1a2f3
parent 39 b78e7185ed13
child 47 8daf1ee0b9a3
--- a/hedgewars/uMisc.pas	Mon Jan 09 20:33:12 2006 +0000
+++ b/hedgewars/uMisc.pas	Tue Jan 10 19:53:18 2006 +0000
@@ -111,7 +111,7 @@
     TargetPoint: TPoint = (X: NoPointX; Y: 0);
 
 implementation
-uses uConsole, uStore;
+uses uConsole, uStore, uIO;
 {$IFDEF DEBUGFILE}
 var f: textfile;
 {$ENDIF}
@@ -137,6 +137,7 @@
 {$IFDEF DEBUGFILE}AddFileLog(Msg);{$ENDIF}
 if isFatalError then
    begin
+   SendIPC('E' + Msg);
    WriteLn(Msg);
    SDL_Quit;
 //   Readln;