--- a/hedgewars/uGearsHandlers.pas Fri Oct 11 17:43:13 2013 +0200
+++ b/hedgewars/uGearsHandlers.pas Sat Jan 04 23:55:54 2014 +0400
@@ -64,7 +64,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)
@@ -72,7 +72,7 @@
end;
if (yy = 0) then
- if TestCollisionXwithGear(Gear, xx) then
+ if TestCollisionXwithGear(Gear, xx) <> 0 then
PrevAngle(Gear, dA)
else
begin