696                     end

   696                     end

   697             end;

   697             end;

   698 

   698 

   699         // should be not CurrentHedgehog, but hedgehog of the last gear which caused damage to this hog

   699         // should be not CurrentHedgehog, but hedgehog of the last gear which caused damage to this hog

   700         // same stand for CheckHHDamage

   700         // same stand for CheckHHDamage

   702             uStats.HedgehogDamaged(Gear, Gear^.LastDamage, 0, true)

   702             uStats.HedgehogDamaged(Gear, Gear^.LastDamage, 0, true)

   703         else if CurrentHedgehog <> nil then

   703         else if CurrentHedgehog <> nil then

   704             uStats.HedgehogDamaged(Gear, CurrentHedgehog, 0, true);

   704             uStats.HedgehogDamaged(Gear, CurrentHedgehog, 0, true);

   705 

   705 

   706         inc(KilledHHs);

   706         inc(KilledHHs);