# HG changeset patch # User unc0rr # Date 1213024177 0 # Node ID bbf382a5fe737fa9be21ed9aed9cc7ac756e53c5 # Parent e883baf3a45888d7b29bfcc55818d40eb9576a93 Ooops, actual fix diff -r e883baf3a458 -r bbf382a5fe73 hedgewars/uGears.pas --- 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