--- a/hedgewars/uMisc.pas	Sat Feb 08 16:29:34 2014 +0400
+++ b/hedgewars/uMisc.pas	Sun Feb 09 00:44:29 2014 +0400
@@ -293,7 +293,7 @@
 end;
 
 function GetTeamStatString(p: PTeam): shortstring;
-var s: ansistring;
+var s: shortstring;
 begin
     s:= p^.TeamName + ':' + IntToStr(p^.TeamHealth) + ':';
     GetTeamStatString:= s;