--- a/hedgewars/uAI.pas	Sun Jul 01 20:16:19 2007 +0000
+++ b/hedgewars/uAI.pas	Mon Jul 02 16:21:07 2007 +0000
@@ -58,7 +58,7 @@
 end;
 
 procedure TestAmmos(var Actions: TActions; Me: PGear; isMoved: boolean);
-var Time, BotLevel: Longword;
+var BotLevel: Longword;
     ap: TAttackParams;
     Score, i: LongInt;
     a, aa: TAmmoType;