hedgewars/uConsole.pas
changeset 7186 013deb83086b
parent 7151 ec15d9e1a7e3
child 8437 93b647d6a00f
--- a/hedgewars/uConsole.pas	Mon May 28 10:38:27 2012 +0200
+++ b/hedgewars/uConsole.pas	Tue Jun 05 22:17:06 2012 +0200
@@ -49,8 +49,10 @@
 end;
 
 procedure WriteToConsole(s: shortstring);
+{$IFNDEF NOCONSOLE}
 var Len: LongInt;
     done: boolean;
+{$ENDIF}
 begin
 {$IFNDEF NOCONSOLE}
 AddFileLog('[Con] ' + s);
@@ -83,7 +85,7 @@
 {$IFNDEF NOCONSOLE}
 WriteToConsole(s);
 {$IFNDEF ANDROID}
-WriteLn(stderr);
+WriteLn(stderr, '');
 inc(CurrLine);
 if CurrLine = cLinesCount then
     CurrLine:= 0;