diff -r d24257910f8d -r aaefa587e277 hedgewars/uTeams.pas --- a/hedgewars/uTeams.pas Sun Dec 02 00:03:16 2012 +0100 +++ b/hedgewars/uTeams.pas Tue Dec 25 04:45:22 2012 +0100 @@ -46,6 +46,7 @@ var MaxTeamHealth: LongInt; GameOver: boolean; + NextClan: boolean; function CheckForWin: boolean; var AliveClan: PClan; @@ -95,7 +96,7 @@ if (Gear <> nil) then Gear^.State:= gstWinner; if Flawless then - AddVoice(sndFlawless, Teams[0]^.voicepack) + AddVoice(sndFlawless, Teams[0]^.voicepack) else AddVoice(sndVictory, Teams[0]^.voicepack); @@ -577,8 +578,8 @@ procedure chBind(var id: shortstring); var KeyName, Modifier, tmp : shortstring; - b : LongInt; - i : Integer; + b : LongInt; + i : Integer; begin KeyName:= ''; Modifier:= '';