changeset 9753 | 9579596cf471 |
parent 9702 | 27006953d901 |
child 9837 | fa94ee96f006 |
9752:656c511ab0f3 | 9753:9579596cf471 |
---|---|
178 AnswerClients [clChan] ["HH_NUM", teamname team, showB $ hhnum team]] |
178 AnswerClients [clChan] ["HH_NUM", teamname team, showB $ hhnum team]] |
179 |
179 |
180 |
180 |
181 loc :: B.ByteString -> B.ByteString |
181 loc :: B.ByteString -> B.ByteString |
182 loc = id |
182 loc = id |
183 |
|
184 maybeNick :: Maybe ClientInfo -> B.ByteString |
|
185 maybeNick = fromMaybe "[empty]" . liftM nick |