diff -r c7ee9592c9a1 -r ec15d9e1a7e3 hedgewars/uStats.pas --- a/hedgewars/uStats.pas Wed May 30 19:01:19 2012 +0400 +++ b/hedgewars/uStats.pas Thu May 31 15:14:39 2012 +0400 @@ -185,10 +185,10 @@ begin if time > 4000 then begin - writeln('FLIGHT'); - writeln(Gear^.Hedgehog^.Team^.TeamName); - writeln(time); - writeln; + writeln(stdout, 'FLIGHT'); + writeln(stdout, Gear^.Hedgehog^.Team^.TeamName); + writeln(stdout, inttostr(time)); + writeln(stdout, ''); end end; @@ -293,14 +293,14 @@ // now to console if winnersClan <> nil then begin - writeln('WINNERS'); + writeln(stdout, 'WINNERS'); for t:= 0 to winnersClan^.TeamsNumber - 1 do - writeln(winnersClan^.Teams[t]^.TeamName); + writeln(stdout, winnersClan^.Teams[t]^.TeamName); end else - writeln('DRAW'); + writeln(stdout, 'DRAW'); -writeln; +writeln(stdout, ''); end; procedure initModule;