hedgewars/GSHandlers.inc
changeset 437 933ed65b55d1
parent 435 25820c10c849
child 439 c336ed82e76d
--- a/hedgewars/GSHandlers.inc	Sun Feb 11 22:10:35 2007 +0000
+++ b/hedgewars/GSHandlers.inc	Mon Feb 12 18:14:11 2007 +0000
@@ -1024,8 +1024,8 @@
    begin
    dec(Gear^.Health);
    case Gear^.State of
-        0: AddGear(hwRound(Gear^.X), hwRound(Gear^.Y), gtAirBomb, 0, Gear^.Tag * cBombsSpeed, 0, 0);
-        1: AddGear(hwRound(Gear^.X), hwRound(Gear^.Y), gtMine,    0, Gear^.Tag * cBombsSpeed, 0, 0);
+        0: FollowGear:= AddGear(hwRound(Gear^.X), hwRound(Gear^.Y), gtAirBomb, 0, Gear^.Tag * cBombsSpeed, 0, 0);
+        1: FollowGear:= AddGear(hwRound(Gear^.X), hwRound(Gear^.Y), gtMine,    0, Gear^.Tag * cBombsSpeed, 0, 0);
         end;
    Gear^.dX:= Gear^.dX + Gear^.Tag * cBombsDistance
    end;