hedgewars/GSHandlers.inc
changeset 439 c336ed82e76d
parent 437 933ed65b55d1
child 441 f2920f08ea5f
--- a/hedgewars/GSHandlers.inc	Mon Feb 12 21:57:29 2007 +0000
+++ b/hedgewars/GSHandlers.inc	Tue Feb 13 18:16:03 2007 +0000
@@ -806,7 +806,7 @@
    Gear^.dY:= Gear^.dY + cGravity;
    Gear^.Y:= Gear^.Y + Gear^.dY;
    if (Gear^.dY.isNegative) and TestCollisionYwithGear(Gear, -1) then Gear^.dY:= 0 else
-   if (Gear^.dY.QWordValue <> 0) and TestCollisionYwithGear(Gear, 1) then
+   if (not Gear^.dY.isNegative) and TestCollisionYwithGear(Gear, 1) then
       begin
       Gear^.dY:= - Gear^.dY * Gear^.Elasticity;
       if Gear^.dY > - _0_001 then Gear^.dY:= 0