--- a/hedgewars/uAmmos.pas	Mon Oct 11 11:36:47 2010 -0400
+++ b/hedgewars/uAmmos.pas	Mon Oct 11 12:13:06 2010 -0400
@@ -147,9 +147,7 @@
     else ammos[a]:= AMMO_INFINITE;
     InitialCounts[Pred(StoreCnt)][a]:= ammos[a];
     end;
-FillAmmoStore(StoresList[Pred(StoreCnt)], ammos);
-for cnt:= 0 to cMaxSlotIndex do
-    PackAmmo(StoresList[Pred(StoreCnt)], cnt)
+FillAmmoStore(StoresList[Pred(StoreCnt)], ammos)
 end;
 
 function GetAmmoByNum(num: Longword): PHHAmmo;