hedgewars/uGears.pas
changeset 5033 46da78d7966b
parent 5024 1e332947147c
child 5062 e2d38329b84a
--- a/hedgewars/uGears.pas	Sun Mar 20 12:52:36 2011 -0400
+++ b/hedgewars/uGears.pas	Sun Mar 20 15:00:01 2011 -0400
@@ -583,7 +583,10 @@
 
         team:= Gear^.Hedgehog^.Team;
         if CurrentHedgehog^.Gear = Gear then
+            begin
             FreeActionsList; // to avoid ThinkThread on drawned gear
+            if ((Ammoz[CurrentHedgehog^.CurAmmoType].Ammo.Propz and ammoprop_NoRoundEnd) <> 0) and (CurrentHedgehog^.MultiShootAttacks > 0) then OnUsedAmmo(CurrentHedgehog^);
+            end;
 
         Gear^.Hedgehog^.Gear:= nil;
         if Gear^.Hedgehog^.King then