resets CurAmmoType in ResetWeapons
authorHenek
Sun, 14 Nov 2010 23:28:45 +0100
changeset 4339 58d4733c9cad
parent 4337 85e02b1a8e8f
child 4341 46b8791e577f
resets CurAmmoType in ResetWeapons
hedgewars/uAmmos.pas
--- a/hedgewars/uAmmos.pas	Sun Nov 14 15:06:02 2010 -0500
+++ b/hedgewars/uAmmos.pas	Sun Nov 14 23:28:45 2010 +0100
@@ -418,7 +418,10 @@
    with TeamsArray[t]^ do
       for i:= 0 to cMaxHHIndex do
           if Hedgehogs[i].Gear <> nil then
+             begin
              FillAmmoStore(Hedgehogs[i].Ammo, InitialCounts[Hedgehogs[i].AmmoStore]);
+             Hedgehogs[i].CurAmmoType:= amNothing
+             end;
 
 for a:= Low(TAmmoType) to High(TAmmoType) do
     if Ammoz[a].SkipTurns >= 10000 then dec(Ammoz[a].SkipTurns,10000)