--- a/hedgewars/uTeams.pas	Thu Feb 04 18:46:49 2010 +0000
+++ b/hedgewars/uTeams.pas	Thu Feb 04 20:45:03 2010 +0000
@@ -65,7 +65,9 @@
 			NameTagTex: PTexture;
 			CrosshairTex,
 			GraveTex,
-			HealthTex: PTexture;
+			HealthTex,
+			FlagTex: PTexture;
+			Flag: string;
 			GraveName: string;
 			FortName: string;
 			TeamHealth: LongInt;
@@ -259,6 +261,7 @@
 FillChar(team^, sizeof(TTeam), 0);
 team^.AttackBar:= 2;
 team^.CurrHedgehog:= cMaxHHIndex;
+team^.Flag:= 'hedgewars';
 
 TeamsArray[TeamsCount]:= team;
 inc(TeamsCount);