diff -r eed7ab6a5087 -r 4c5ca656d1bb gameServer/CoreTypes.hs --- a/gameServer/CoreTypes.hs Thu Jun 24 19:52:04 2010 +0400 +++ b/gameServer/CoreTypes.hs Fri Jun 25 10:05:42 2010 +0400 @@ -49,7 +49,7 @@ data TeamInfo = TeamInfo { - teamownerId :: !Int, + teamownerId :: ClientIndex, teamowner :: B.ByteString, teamname :: B.ByteString, teamcolor :: B.ByteString,