--- a/hedgewars/GSHandlers.inc	Wed Jun 05 15:42:00 2013 +0200
+++ b/hedgewars/GSHandlers.inc	Wed Jun 05 16:28:30 2013 +0200
@@ -5135,7 +5135,7 @@
     HHGear, iter: PGear;
     landRect: TSDL_Rect;
     ndX, ndY: hwFloat;
-    i, j, t, gX, gY: LongInt;
+    i, t, gX, gY: LongInt;
     hogs: PGearArrayS;
     vg: PVisualGear;
 begin