hedgewars/uGearsHedgehog.pas
changeset 11468 2f6f8baa2a97
parent 11267 9621fdcad965
child 11484 cb64affd7715
--- a/hedgewars/uGearsHedgehog.pas	Mon Dec 28 23:37:44 2015 +0300
+++ b/hedgewars/uGearsHedgehog.pas	Tue Dec 29 14:44:32 2015 -0500
@@ -587,7 +587,7 @@
     begin
     Gear^.Hedgehog^.Effects[heFrozen]:= 0;
     Gear^.State:= Gear^.State or gstNoDamage;
-    doMakeExplosion(hwRound(Gear^.X), hwRound(Gear^.Y), 30, CurrentHedgehog, EXPLAutoSound);
+    doMakeExplosion(hwRound(Gear^.X), hwRound(Gear^.Y), Gear^.Boom, CurrentHedgehog, EXPLAutoSound);
     grave:= AddGear(hwRound(Gear^.X), hwRound(Gear^.Y), gtGrave, 0, _0, _0, 0);
     grave^.Hedgehog:= Gear^.Hedgehog;
     grave^.Pos:= Gear^.uid;