fix pas2c build
authorsheepluva
Sat, 05 Jul 2014 20:27:42 +0200
changeset 10355 334b5f513703
parent 10354 56bd029245fc
child 10356 7d1044267b83
fix pas2c build
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)