--- a/hedgewars/uTeams.pas	Sun Aug 31 16:27:47 2008 +0000
+++ b/hedgewars/uTeams.pas	Sun Aug 31 17:22:50 2008 +0000
@@ -30,8 +30,9 @@
      THedgehog = record
                  Name: string[MAXNAMELEN];
                  Gear: PGear;
-                 NameTagTex: PTexture;
-                 HealthTagTex: PTexture;
+                 NameTagTex,
+                 HealthTagTex,
+                 HatTex: PTexture;
                  Ammo: PHHAmmo;
                  AmmoStore: Longword;
                  CurSlot, CurAmmo: LongWord;
@@ -40,6 +41,7 @@
                  visStepPos: LongWord;
                  BotLevel  : LongWord; // 0 - Human player
                  stats: TStatistics;
+                 Hat: String;
                  end;
      TTeam = record
              Clan: PClan;