hedgewars/HHHandlers.inc
changeset 5706 4454aa0523e7
parent 5640 07676ee23aff
child 5720 a962d0823f49
--- a/hedgewars/HHHandlers.inc	Tue Aug 30 12:32:33 2011 -0400
+++ b/hedgewars/HHHandlers.inc	Wed Aug 31 00:58:48 2011 -0400
@@ -1093,13 +1093,3 @@
     doStepHedgehogDriven(Gear)
     end;
 end;
-
-procedure doStepHedgehogReturn(Gear: PGear);
-begin
-if (Gear^.Timer > 0) and ((GameTicks mod 20) = 0) then dec(Gear^.Timer)
-else if (Gear^.Timer = 0) then
-    begin
-    Gear^.doStep:= @doStepHedgehog;
-    Gear^.State:= Gear^.State and not gstTmpFlag;
-    end
-end;