netserver/Miscutils.hs
changeset 1411 df78c9571bc7
parent 1408 fab171a17968
child 1461 87e5a6c3882c
--- a/netserver/Miscutils.hs	Fri Oct 24 17:34:20 2008 +0000
+++ b/netserver/Miscutils.hs	Fri Oct 24 17:53:14 2008 +0000
@@ -51,9 +51,11 @@
 		gameinprogress :: Bool,
 		playersIn :: Int,
 		readyPlayers :: Int,
+		isRestrictedJoins :: Bool,
+		isRestrictedTeams :: Bool,
 		params :: Map.Map String [String]
 	}
-createRoom = (RoomInfo "" "" 0 [] "+rnd+" False 1 0 Map.empty)
+createRoom = (RoomInfo "" "" 0 [] "+rnd+" False 1 0 False False Map.empty)
 
 type ClientsTransform = [ClientInfo] -> [ClientInfo]
 type RoomsTransform = [RoomInfo] -> [RoomInfo]