diff -r 93e92e82d5c8 -r 71df899c4163 hedgewars/uGearsUtils.pas
--- a/hedgewars/uGearsUtils.pas	Sat Jun 23 21:37:47 2012 -0400
+++ b/hedgewars/uGearsUtils.pas	Sat Jun 23 22:39:00 2012 -0400
@@ -107,7 +107,7 @@
                         tdX:= Gear^.X-fX;
                         tdY:= Gear^.Y-fY;
                         if hwRound(hwAbs(tdX)+hwAbs(tdY)) < dmgBase then
-                            dmg:= dmgBase - max(hwRound(Distance(tdX, tdY)),Gear^.Radius);
+                            dmg:= dmgBase - hwRound(Distance(tdX, tdY));
                         if dmg > 1 then
                             begin
                             dmg:= ModifyDamage(min(dmg div 2, Radius), Gear);