diff -r 92535bc7e928 -r 15c3fb4882df hedgewars/uGearsUtils.pas --- a/hedgewars/uGearsUtils.pas Fri Jul 13 13:21:52 2012 +0400 +++ b/hedgewars/uGearsUtils.pas Sat Jul 14 23:19:09 2012 -0400 @@ -343,6 +343,11 @@ Y:= hwRound(Gear^.Y); if cWaterLine < Y + Gear^.Radius then begin + if Gear^.State and gstInvisible <> 0 then + begin + DeleteGear(Gear); + exit + end; isSubmersible:= (Gear = CurrentHedgehog^.Gear) and (CurAmmoGear <> nil) and (CurAmmoGear^.AmmoType = amJetpack); skipSpeed := _0_25; skipAngle := _1_9;