equal
deleted
inserted
replaced
86 let rInfo = if roomId /= lobbyId then B.concat [adminSign, roomMasterSign, "room ", name clRoom] else adminSign `B.append` "lobby" |
86 let rInfo = if roomId /= lobbyId then B.concat [adminSign, roomMasterSign, "room ", name clRoom] else adminSign `B.append` "lobby" |
87 let roomStatus = if isJust $ gameInfo clRoom then |
87 let roomStatus = if isJust $ gameInfo clRoom then |
88 if teamsInGame cl > 0 then "(playing)" else "(spectating)" |
88 if teamsInGame cl > 0 then "(playing)" else "(spectating)" |
89 else |
89 else |
90 "" |
90 "" |
91 let hostStr = if isAdminAsking then host cl else cutHost $ host cl |
91 let hostStr = if isAdminAsking then host cl else B.empty |
92 if noSuchClient then |
92 if noSuchClient then |
93 return [] |
93 return [] |
94 else |
94 else |
95 answerClient [ |
95 answerClient [ |
96 "INFO", |
96 "INFO", |