--- a/hedgewars/uGearsHandlersMess.pas	Fri Jan 10 11:35:02 2014 -0500
+++ b/hedgewars/uGearsHandlersMess.pas	Fri Jan 10 22:56:10 2014 +0400
@@ -2943,7 +2943,7 @@
         exit
         end;
 
-    cakeStep(Gear);
+    if not cakeStep(Gear) then Gear^.doStep:= @doStepCakeFall;
 
     if Gear^.Tag = 0 then
         begin