--- a/hedgewars/uTeams.pas	Thu Apr 29 19:40:13 2010 +0000
+++ b/hedgewars/uTeams.pas	Thu Apr 29 21:25:51 2010 +0000
@@ -80,7 +80,6 @@
 
     TClan = record
             Color: Longword;
-            RColor: Longword; // color with reversed byte order
             Teams: array[0..Pred(cMaxTeams)] of PTeam;
             TeamsNumber: Longword;
             CurrTeam: LongWord;
@@ -315,7 +314,6 @@
         begin
         ClanIndex:= Pred(ClansCount);
         Color:= TeamColor;
-        RColor:= $FF000000 or ((Color shr 16) and $FF) or ((Color shl 16) and $00FF0000) or (Color and $0000FF00)
         end
    end else
    begin