author | unc0rr |
Tue, 01 May 2012 20:54:30 +0400 | |
changeset 6981 | 045e8162c9cd |
parent 6980 | 07a710e22846 |
child 6982 | 8d41d22a291d |
--- 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,