hedgewars/uGearsUtils.pas
changeset 7357 06454899d0d2
parent 7272 71df899c4163
child 7372 fcc002658832
--- a/hedgewars/uGearsUtils.pas	Sat Jul 07 23:22:03 2012 +0200
+++ b/hedgewars/uGearsUtils.pas	Sun Jul 08 10:03:31 2012 -0400
@@ -446,6 +446,10 @@
     sparkles: PVisualGear;
     gX, gY: LongInt;
 begin
+    if (Gear^.LastDamage <> nil) then
+        uStats.HedgehogDamaged(Gear, Gear^.LastDamage, 0, true)
+    else
+        uStats.HedgehogDamaged(Gear, CurrentHedgehog, 0, true);
     AttackBar:= 0;
     gear^.dX := _0;
     gear^.dY := _0;