hedgewars/uGearsHandlersMess.pas
changeset 9853 8786d4ac9e0b
parent 9824 136e0708eda2
child 9872 e0dd66b2e73b
--- a/hedgewars/uGearsHandlersMess.pas	Wed Dec 25 11:52:09 2013 +0400
+++ b/hedgewars/uGearsHandlersMess.pas	Wed Dec 25 08:44:39 2013 -0500
@@ -3008,6 +3008,8 @@
 
     FollowGear := Gear;
 
+    Gear^.dY:= cMaxWindSpeed * 100;
+
     Gear^.doStep := @doStepCakeFall
 end;