--- a/hedgewars/uWorld.pas	Thu Apr 29 19:40:13 2010 +0000
+++ b/hedgewars/uWorld.pas	Thu Apr 29 21:25:51 2010 +0000
@@ -652,7 +652,7 @@
       highlight:= bShowFinger and (CurrentTeam = TeamsArray[t]) and ((RealTicks mod 1000) < 500);
       
       if highlight then
-         Tint(Clan^.RColor);
+         Tint(Clan^.Color);
 
       // draw name
       DrawTexture(-NameTagTex^.w - 16, cScreenHeight + DrawHealthY, NameTagTex);