hedgewars/GSHandlers.inc
changeset 521 bc8fd78d7598
parent 520 e83dfb7ffead
child 522 ca089787f59d
--- a/hedgewars/GSHandlers.inc	Thu May 24 19:41:51 2007 +0000
+++ b/hedgewars/GSHandlers.inc	Thu May 24 20:33:07 2007 +0000
@@ -760,7 +760,8 @@
       if Gear^.Timer = 0 then
          begin
          doMakeExplosion(hwRound(Gear^.X), hwRound(Gear^.Y), 50, EXPLAutoSound);
-         DeleteGear(Gear)
+         DeleteGear(Gear);
+         exit
          end;
       dec(Gear^.Timer);
       end else // gsttmpFlag = 0