equal
deleted
inserted
replaced
28 roomID :: !Int, |
28 roomID :: !Int, |
29 pingsQueue :: !Word, |
29 pingsQueue :: !Word, |
30 isMaster :: Bool, |
30 isMaster :: Bool, |
31 isReady :: Bool, |
31 isReady :: Bool, |
32 isAdministrator :: Bool, |
32 isAdministrator :: Bool, |
|
33 clientClan :: String, |
33 teamsInGame :: Word |
34 teamsInGame :: Word |
34 } |
35 } |
35 |
36 |
36 instance Show ClientInfo where |
37 instance Show ClientInfo where |
37 show ci = show (clientUID ci) |
38 show ci = show (clientUID ci) |
45 HedgehogInfo String String |
46 HedgehogInfo String String |
46 |
47 |
47 data TeamInfo = |
48 data TeamInfo = |
48 TeamInfo |
49 TeamInfo |
49 { |
50 { |
|
51 teamownerId :: !Int, |
50 teamowner :: String, |
52 teamowner :: String, |
51 teamname :: String, |
53 teamname :: String, |
52 teamcolor :: String, |
54 teamcolor :: String, |
53 teamgrave :: String, |
55 teamgrave :: String, |
54 teamfort :: String, |
56 teamfort :: String, |