diff -r 9330bacf2569 -r d987230b85ed hedgewars/uTeams.pas
--- a/hedgewars/uTeams.pas	Wed Jun 05 15:42:00 2013 +0200
+++ b/hedgewars/uTeams.pas	Wed Jun 05 16:28:30 2013 +0200
@@ -110,7 +110,7 @@
 end;
 
 procedure SwitchHedgehog;
-var c, i, t, j: LongWord;
+var c, i, t: LongWord;
     PrevHH, PrevTeam : LongWord;
 begin
 TargetPoint.X:= NoPointX;