hedgewars/uGears.pas
changeset 4885 bf7f2c1cc235
parent 4883 7cddc9201a1d
child 4895 481dfbe69cd2
--- a/hedgewars/uGears.pas	Sun Jan 30 06:56:12 2011 +0100
+++ b/hedgewars/uGears.pas	Sun Jan 30 21:33:08 2011 +0300
@@ -1004,7 +1004,9 @@
     vampDmg, tmpDmg, i: Longword;
     vg: PVisualGear;
 begin
-    if (Gear^.Kind = gtHedgehog) and (Damage>=1) then
+  if Damage = 0 then exit; // nothing to apply
+
+    if (Gear^.Kind = gtHedgehog) then
     begin
     uStats.HedgehogDamaged(Gear, AttackerHog);
     HHHurt(Gear^.Hedgehog, Source);