hedgewars/HHHandlers.inc
changeset 522 ca089787f59d
parent 520 e83dfb7ffead
child 525 ae21b8e86dd9
--- a/hedgewars/HHHandlers.inc	Thu May 24 20:33:07 2007 +0000
+++ b/hedgewars/HHHandlers.inc	Sat May 26 16:49:37 2007 +0000
@@ -391,6 +391,7 @@
       begin
       if AllInactive then
          begin
+         Gear^.State:= Gear^.State or gstNoDamage;
          doMakeExplosion(hwRound(Gear^.X), hwRound(Gear^.Y), 30, EXPLAutoSound);
          AddGear(hwRound(Gear^.X), hwRound(Gear^.Y), gtGrave, 0, _0, _0, 0)^.Hedgehog:= Gear^.Hedgehog;
          DeleteGear(Gear);