hedgewars/uGearsHandlersMess.pas
changeset 13281 36243bd726df
parent 13276 2709572ed815
child 13285 fd1017c85dd4
--- a/hedgewars/uGearsHandlersMess.pas	Sat Mar 24 23:57:54 2018 +0100
+++ b/hedgewars/uGearsHandlersMess.pas	Sat Mar 24 19:05:46 2018 -0400
@@ -4199,7 +4199,7 @@
         if (dY < _0_1) and (dY > -_0_1) then
             begin
             Gear^.State := Gear^.State or gsttmpFlag;
-            dX := _0;
+            dX := SignAs(_0, dX);
             dY := dY - _0_2
             end
         end