--- a/hedgewars/uGearsHedgehog.pas	Tue May 01 20:54:30 2012 +0400
+++ b/hedgewars/uGearsHedgehog.pas	Tue May 01 19:56:55 2012 +0200
@@ -634,8 +634,6 @@
      end
 end;
 
-const StepTicks: LongWord = 0;
-
 procedure HedgehogStep(Gear: PGear);
 var PrevdX: LongInt;
     CurWeapon: PAmmo;