changeset 6981 | 045e8162c9cd |
parent 6541 | 08ed346ed341 |
child 7766 | 98edc0724a28 |
--- a/gameServer/Utils.hs Tue May 01 20:54:02 2012 +0400 +++ b/gameServer/Utils.hs Tue May 01 20:54:30 2012 +0400 @@ -123,9 +123,7 @@ where f = map Char.toUpper . UTF8.toString -roomInfo n r - | isRestrictedJoins r = [] - | otherwise = [ +roomInfo n r = [ showB $ isJust $ gameInfo r, name r, showB $ playersIn r,