hedgewars/uGearsHedgehog.pas
changeset 11515 64c1ea171204
parent 11489 cb64affd7715
child 11517 0e305b7153e6
--- a/hedgewars/uGearsHedgehog.pas	Wed Jan 13 19:54:55 2016 +0300
+++ b/hedgewars/uGearsHedgehog.pas	Wed Jan 13 21:29:04 2016 +0300
@@ -936,6 +936,7 @@
     land:= TestCollisionYwithGear(Gear, 1);
     if ((Gear^.dX.QWordValue + Gear^.dY.QWordValue) < _0_55.QWordValue) and ((land and lfIce) = 0)
     and ((land and lfBouncy = 0) or (Gear^.State and gstCollision <> 0))
+    and (Gear^.Damage = 0)
     and ((Gear^.State and gstHHJumping) <> 0) then
         SetLittle(Gear^.dX);