--- a/hedgewars/uGearsUtils.pas Wed Dec 30 15:26:25 2015 -0500
+++ b/hedgewars/uGearsUtils.pas Wed Dec 30 23:20:57 2015 -0500
@@ -1074,7 +1074,7 @@
if r-hwRound(dx+dy) > 0 then
begin
dist:= hwRound(Distance(dx, dy));
- dmg:= ModifyDamage(min(r - dist, 25), t);
+ dmg:= ModifyDamage(min(r - dist, Gear^.Boom), t);
end;
if dmg > 0 then
begin
@@ -1102,7 +1102,7 @@
if r-hwRound(dx+dy) > 0 then
begin
dist:= hwRound(Distance(dx, dy));
- dmg:= ModifyDamage(min(r - dist, 25), t);
+ dmg:= ModifyDamage(min(r - dist, Gear^.Boom), t);
end;
if dmg > 0 then
begin