hedgewars/uGearsHandlersMess.pas
changeset 12292 93434ab299a0
parent 12277 da65acd5dc9d
child 12299 6b25d117a904
--- a/hedgewars/uGearsHandlersMess.pas	Wed Apr 19 22:26:24 2017 +0200
+++ b/hedgewars/uGearsHandlersMess.pas	Thu Apr 20 00:04:35 2017 +0200
@@ -3141,6 +3141,7 @@
                 end;
         s:= ansistring(Gear^.Hedgehog^.Name);
         AddCaption(FormatA(GetEventString(eidKamikaze), s), cWhiteColor, capgrpMessage);
+        uStats.HedgehogSacrificed(Gear^.Hedgehog);
         AfterAttack;
         HHGear^.Message:= HHGear^.Message or gmDestroy;
         DeleteGear(Gear);
@@ -4836,6 +4837,7 @@
             begin
             Gear^.Y:= Gear^.Y + _50;
             OnUsedAmmo(CurrentHedgehog^);
+            uStats.HedgehogSacrificed(CurrentHedgehog);
             if CurrentHedgehog^.Gear <> nil then
                 begin
                 // Drown the hedgehog.  Could also just delete it, but hey, this gets a caption
@@ -4859,6 +4861,7 @@
         begin
         Gear^.Y:= Gear^.Y + _50;
         OnUsedAmmo(CurrentHedgehog^);
+        uStats.HedgehogSacrificed(CurrentHedgehog);
         if CurrentHedgehog^.Gear <> nil then
             begin
             // Drown the hedgehog.  Could also just delete it, but hey, this gets a caption