--- 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