author | nemo |
Sun, 08 Dec 2013 13:49:11 -0500 | |
changeset 9767 | 17df4c8201f6 |
parent 9766 | 62c49992b049 |
child 9768 | 08799c901a42 |
--- a/hedgewars/uGearsHandlersMess.pas Sun Dec 08 17:58:45 2013 +0100 +++ b/hedgewars/uGearsHandlersMess.pas Sun Dec 08 13:49:11 2013 -0500 @@ -398,7 +398,8 @@ if (xland or land) and lfBouncy = 0 then begin Gear^.dX := tdY*Gear^.Elasticity*Gear^.Friction; - Gear^.dY := tdX*Gear^.Elasticity + Gear^.dY := tdX*Gear^.Elasticity; + Gear^.State := Gear^.State or gstCollision end else begin