--- a/hedgewars/uGearsHandlersMess.pas Sun Jan 24 00:00:25 2016 +0100
+++ b/hedgewars/uGearsHandlersMess.pas Sun Jan 24 00:02:57 2016 +0100
@@ -86,7 +86,7 @@
procedure doStepKamikaze(Gear: PGear);
procedure doStepCakeExpl(Gear: PGear);
procedure doStepCakeDown(Gear: PGear);
-procedure doStepCakeWork(Gear: PGear);
+procedure doStepCakeWalk(Gear: PGear);
procedure doStepCakeUp(Gear: PGear);
procedure doStepCakeFall(Gear: PGear);
procedure doStepCake(Gear: PGear);
@@ -3248,7 +3248,7 @@
end;
-procedure doStepCakeWork(Gear: PGear);
+procedure doStepCakeWalk(Gear: PGear);
var
tdx, tdy: hwFloat;
cakeData: PCakeData;
@@ -3315,7 +3315,7 @@
end;
CakeI := 0;
end;
- Gear^.doStep := @doStepCakeWork
+ Gear^.doStep := @doStepCakeWalk
end
else
inc(Gear^.Pos)