hedgewars/uGearsHandlers.pas
changeset 9706 5178d2263521
parent 9080 9b42757d7e71
child 9950 2759212a27de
child 9969 f27921b31b61
--- a/hedgewars/uGearsHandlers.pas	Mon Nov 18 22:14:16 2013 +0100
+++ b/hedgewars/uGearsHandlers.pas	Tue Nov 19 22:15:40 2013 -0500
@@ -61,7 +61,7 @@
         begin
         Gear^.Tag := 0;
         Gear^.Y := Gear^.Y + int2hwFloat(yy);
-        if not TestCollisionXwithGear(Gear, xxn) then
+        if TestCollisionXwithGear(Gear, xxn) = 0 then
             begin
             Gear^.X := Gear^.X + int2hwFloat(xxn);
             NextAngle(Gear, dA)
@@ -69,7 +69,7 @@
         end;
 
     if (yy = 0) then
-        if TestCollisionXwithGear(Gear, xx) then
+        if TestCollisionXwithGear(Gear, xx) <> 0 then
             PrevAngle(Gear, dA)
     else
         begin