hedgewars/uGears.pas
changeset 982 bbf382a5fe73
parent 981 e883baf3a458
child 984 dd5f16f69926
--- a/hedgewars/uGears.pas	Mon Jun 09 15:08:54 2008 +0000
+++ b/hedgewars/uGears.pas	Mon Jun 09 15:09:37 2008 +0000
@@ -992,7 +992,7 @@
 					t^.ar[i]^.Active:= true;
 					t^.ar[i]^.State:= t^.ar[i]^.State or gstMoving;
 
-(*					if TestCollisionXwithGear(t^.ar[i], hwSign(t^.ar[i]^.dX)) then
+					if TestCollisionXwithGear(t^.ar[i], hwSign(t^.ar[i]^.dX)) then
 						begin
 						if not (TestCollisionXwithXYShift(t^.ar[i], _0, -3, hwSign(t^.ar[i]^.dX))
 							or TestCollisionYwithGear(t^.ar[i], -1)) then t^.ar[i]^.Y:= t^.ar[i]^.Y - _1;
@@ -1001,7 +1001,7 @@
 						if not (TestCollisionXwithXYShift(t^.ar[i], _0, -1, hwSign(t^.ar[i]^.dX))
 							or TestCollisionYwithGear(t^.ar[i], -1)) then t^.ar[i]^.Y:= t^.ar[i]^.Y - _1;
 						end;
-*)					
+					
 					FollowGear:= t^.ar[i]
 					end;
 		end