--- a/hedgewars/uConsole.pas	Fri May 25 15:35:48 2012 +0400
+++ b/hedgewars/uConsole.pas	Mon May 28 17:54:23 2012 +0400
@@ -49,8 +49,10 @@
 end;
 
 procedure WriteToConsole(s: shortstring);
+{$IFNDEF NOCONSOLE}
 var Len: LongInt;
     done: boolean;
+{$ENDIF}
 begin
 {$IFNDEF NOCONSOLE}
 AddFileLog('[Con] ' + s);