--- a/hedgewars/uTeams.pas	Mon Jan 12 18:51:37 2009 +0000
+++ b/hedgewars/uTeams.pas	Mon Jan 12 21:49:10 2009 +0000
@@ -18,7 +18,7 @@
 
 unit uTeams;
 interface
-uses SDLh, uConsts, uKeys, uGears, uRandom, uFloat, uStats, GL;
+uses SDLh, uConsts, uKeys, uGears, uRandom, uFloat, uStats, GL, uSound;
 {$INCLUDE options.inc}
 
 type PHHAmmo = ^THHAmmo;
@@ -66,6 +66,7 @@
 			AttackBar: LongWord;
 			HedgehogsNumber: Longword;
 			hasGone: boolean;
+			voicepack: PVoicepack;
 			end;
 			
 	TClan = record
@@ -97,7 +98,7 @@
 procedure TeamGone(s: shortstring);
 
 implementation
-uses uMisc, uWorld, uAI, uLocale, uConsole, uAmmos, uSound, uChat;
+uses uMisc, uWorld, uAI, uLocale, uConsole, uAmmos, uChat;
 const MaxTeamHealth: LongInt = 0;
 
 procedure FreeTeamsList; forward;