# HG changeset patch # User sheepluva # Date 1404584862 -7200 # Node ID 334b5f513703fa7bc6f8ce59678214fad553c487 # Parent 56bd029245fc46e9c5218a48c76b08983057073e fix pas2c build diff -r 56bd029245fc -r 334b5f513703 hedgewars/uVisualGearsHandlers.pas --- a/hedgewars/uVisualGearsHandlers.pas Sat Jul 05 20:15:56 2014 +0200 +++ b/hedgewars/uVisualGearsHandlers.pas Sat Jul 05 20:27:42 2014 +0200 @@ -345,7 +345,7 @@ Gear^.dX := Gear^.dX / (1.001 * Steps); Gear^.dY := Gear^.dY / (1.001 * Steps); -if (Gear^.FrameTicks <= Steps) or not CheckCoordInWater(round(Gear^.X), round(Gear^.Y)) then +if (Gear^.FrameTicks <= Steps) or (not CheckCoordInWater(round(Gear^.X), round(Gear^.Y))) then DeleteVisualGear(Gear) else dec(Gear^.FrameTicks, Steps)