--- a/hedgewars/uMisc.pas	Sat Jan 30 18:23:42 2010 +0000
+++ b/hedgewars/uMisc.pas	Sun Jan 31 16:20:53 2010 +0000
@@ -150,7 +150,6 @@
 function  DecodeBase64(s: shortstring): shortstring;
 function  doSurfaceConversion(tmpsurf: PSDL_Surface): PSDL_Surface;
 function  endian(independent: LongWord): LongWord;
-function  modifyDamage(dmg: Longword): Longword;
 {$IFDEF DEBUGFILE}
 procedure AddFileLog(s: shortstring);
 function  RectToStr(Rect: TSDL_Rect): shortstring;
@@ -527,11 +526,6 @@
 end;
 {$ENDIF}
 
-function modifyDamage(dmg: Longword): Longword;
-begin
-ModifyDamage:= hwRound(_0_01 * cDamageModifier * dmg * cDamagePercent)
-end;
-
 {$IFDEF DEBUGFILE}
 procedure AddFileLog(s: shortstring);
 begin