hedgewars/uAmmos.pas
changeset 3033 2a8f385ab466
parent 3030 411146650700
child 3038 4e48c276a468
--- a/hedgewars/uAmmos.pas	Sun Mar 21 15:50:38 2010 +0000
+++ b/hedgewars/uAmmos.pas	Sun Mar 21 16:04:57 2010 +0000
@@ -20,7 +20,7 @@
 
 unit uAmmos;
 interface
-uses uConsts, uTeams;
+uses uConsts, uTeams, uStats;
 
 procedure init_uAmmos;
 procedure free_uAmmos;
@@ -68,7 +68,7 @@
            Ammo^[Ammoz[a].Slot, mi[Ammoz[a].Slot]].Count:= AMMO_INFINITE;
        inc(mi[Ammoz[a].Slot])
        end
-    else if ((GameFlags and gfPlaceHog) <> 0) and (a = amTeleport) then 
+    else if (TotalRounds < 0) and ((GameFlags and gfPlaceHog) <> 0) and (a = amTeleport) then 
        begin
        TryDo(mi[Ammoz[a].Slot] <= cMaxSlotAmmoIndex, 'Ammo slot overflow', true);
        Ammo^[Ammoz[a].Slot, mi[Ammoz[a].Slot]]:= Ammoz[a].Ammo;