--- a/hedgewars/CCHandlers.inc	Sun Jan 28 21:03:58 2007 +0000
+++ b/hedgewars/CCHandlers.inc	Thu Feb 01 21:42:11 2007 +0000
@@ -100,8 +100,7 @@
 var c: LongInt;
 begin
 if CurrentTeam = nil then OutError(errmsgIncorrectUse + ' "/color"', true);
-//val(id, CurrentTeam^.Color, c);
-CurrentTeam^.Color:= random($FFFFFF);
+val(id, CurrentTeam^.Color, c);
 CurrentTeam^.AdjColor:= CurrentTeam^.Color;
 AdjustColor(CurrentTeam^.AdjColor)
 end;