diff -r 29b477319854 -r 3c3dc6a148ca hedgewars/uTeams.pas --- a/hedgewars/uTeams.pas Sun Jul 16 08:13:51 2006 +0000 +++ b/hedgewars/uTeams.pas Thu Jul 20 20:11:32 2006 +0000 @@ -83,7 +83,7 @@ procedure RestoreTeamsFromSave; implementation -uses uMisc, uStore, uWorld, uIO, uAI; +uses uMisc, uStore, uWorld, uIO, uAI, uLocale; const MaxTeamHealth: integer = 0; procedure FreeTeamsList; forward; @@ -148,7 +148,7 @@ function AddTeam: PTeam; begin New(Result); -TryDo(Result <> nil, 'AddTean: Result = nil', true); +TryDo(Result <> nil, 'AddTeam: Result = nil', true); FillChar(Result^, sizeof(TTeam), 0); Result.AttackBar:= 2; if TeamsList = nil then TeamsList:= Result @@ -234,7 +234,7 @@ with Ammo[CurSlot, CurAmmo] do begin - s:= Ammoz[AmmoType].Name; + s:= trammo[Ammoz[AmmoType].NameId]; if Count <> AMMO_INFINITE then s:= s + ' (' + IntToStr(Count) + ')'; if (Propz and ammoprop_Timerable) <> 0 then