--- a/hedgewars/uStats.pas	Fri Apr 25 20:41:23 2008 +0000
+++ b/hedgewars/uStats.pas	Fri Apr 25 21:44:58 2008 +0000
@@ -79,8 +79,7 @@
 end;
 
 procedure TurnReaction;
-var Gear: PGear;
-    i, t: LongInt;
+var i, t: LongInt;
 begin
 inc(FinishedTurnsTotal);
 if FinishedTurnsTotal = 0 then exit;