hedgewars/uGearsHandlersMess.pas
changeset 14342 d738a03da740
parent 14341 d5317635f368
child 14343 2221c418026a
--- a/hedgewars/uGearsHandlersMess.pas	Thu Nov 29 10:49:08 2018 -0500
+++ b/hedgewars/uGearsHandlersMess.pas	Thu Nov 29 10:56:06 2018 -0500
@@ -2073,7 +2073,8 @@
         begin
         if Gear^.Damage > 0 then
             begin
-            doMakeExplosion(hwRound(Gear^.X), hwRound(Gear^.Y), Gear^.Boom, Gear^.Hedgehog, EXPLAutoSound or EXPLForceDraw);
+            doMakeExplosion(hwRound(Gear^.X), hwRound(Gear^.Y), Gear^.Boom, Gear^.Hedgehog, EXPLAutoSound or EXPLDontDraw);
+            DrawExplosion(hwRound(Gear^.X), hwRound(Gear^.Y), Gear^.Boom+1);
             DeleteGear(Gear)
             end;
         doStepFallingGear(Gear);