--- a/hedgewars/uTeams.pas Tue May 01 20:54:30 2012 +0400
+++ b/hedgewars/uTeams.pas Tue May 01 19:56:55 2012 +0200
@@ -39,7 +39,7 @@
uses uLocale, uAmmos, uChat, uMobile, uVariables, uUtils, uIO, uCaptions, uCommands, uDebug, uScript,
uGearsUtils, uGearsList{$IFDEF SDL13}, uTouch{$ENDIF};
-const MaxTeamHealth: LongInt = 0;
+var MaxTeamHealth: LongInt;
function CheckForWin: boolean;
var AliveClan: PClan;
@@ -624,6 +624,7 @@
LocalAmmo:= -1;
GameOver:= false;
NextClan:= true;
+MaxTeamHealth:= 0;
end;
procedure freeModule;