equal
deleted
inserted
replaced
105 h "MAXTEAMS" n | not $ B.null n = handleCmd_roomOnly ["MAXTEAMS", n] |
105 h "MAXTEAMS" n | not $ B.null n = handleCmd_roomOnly ["MAXTEAMS", n] |
106 | otherwise = handleCmd_roomOnly ["MAXTEAMS"] |
106 | otherwise = handleCmd_roomOnly ["MAXTEAMS"] |
107 |
107 |
108 -- lobby-only commands |
108 -- lobby-only commands |
109 h "STATS" _ = handleCmd_lobbyOnly ["STATS"] |
109 h "STATS" _ = handleCmd_lobbyOnly ["STATS"] |
110 h "RESTART_SERVER" "YES" = handleCmd_lobbyOnly ["RESTART_SERVER"] |
110 h "RESTART_SERVER" p = handleCmd_lobbyOnly ["RESTART_SERVER", upperCase p] |
111 |
111 |
112 -- room and lobby commands |
112 -- room and lobby commands |
113 h "QUIT" _ = handleCmd ["QUIT"] |
113 h "QUIT" _ = handleCmd ["QUIT"] |
114 h "RND" p = handleCmd ("RND" : B.words p) |
114 h "RND" p = handleCmd ("RND" : B.words p) |
115 h "GLOBAL" p = serverAdminOnly $ do |
115 h "GLOBAL" p = serverAdminOnly $ do |