netserver/Miscutils.hs
changeset 1396 abb28dcb6d0d
parent 1391 735f6d43780b
child 1402 c164f215f7d2
--- a/netserver/Miscutils.hs	Wed Oct 22 14:01:43 2008 +0000
+++ b/netserver/Miscutils.hs	Wed Oct 22 15:31:35 2008 +0000
@@ -48,9 +48,10 @@
 		teams :: [TeamInfo],
 		gamemap :: String,
 		gameinprogress :: Bool,
+		playersIn :: Int,
 		params :: Map.Map String [String]
 	}
-createRoom = (RoomInfo "" "" 0 [] "+rnd+" False Map.empty)
+createRoom = (RoomInfo "" "" 0 [] "+rnd+" False 1 Map.empty)
 
 type ClientsTransform = [ClientInfo] -> [ClientInfo]
 type RoomsTransform = [RoomInfo] -> [RoomInfo]