--- a/hedgewars/uStats.pas	Fri Jan 07 21:41:12 2011 +0300
+++ b/hedgewars/uStats.pas	Fri Jan 07 23:08:34 2011 +0300
@@ -29,7 +29,7 @@
 procedure freeModule;
 
 procedure AmmoUsed(am: TAmmoType);
-procedure HedgehogDamaged(Gear: PGear);
+procedure HedgehogDamaged(Gear, Attacker: PGear);
 procedure Skipped;
 procedure TurnReaction;
 procedure SendStats;
@@ -50,15 +50,13 @@
     vpHurtSameClan: PVoicepack = nil;
     vpHurtEnemy: PVoicepack = nil;
 
-procedure HedgehogDamaged(Gear: PGear);
+procedure HedgehogDamaged(Gear, Attacker: PGear);
 begin
-if CurrentHedgehog^.Team^.Clan = Gear^.Hedgehog^.Team^.Clan then
+if Attacker^.Hedgehog^.Team^.Clan = Gear^.Hedgehog^.Team^.Clan then
     vpHurtSameClan:= CurrentHedgehog^.Team^.voicepack
 else
     vpHurtEnemy:= Gear^.Hedgehog^.Team^.voicepack;
 
-if bBetweenTurns then exit;
-
 //////////////////////////
 
 if Gear <> CurrentHedgehog^.Gear then