gameServer/NetRoutines.hs
changeset 3502 ad38c653b7d9
parent 3500 af8390d807d6
child 4242 5e3c5fe2cb14
--- a/gameServer/NetRoutines.hs	Sun Jun 06 19:03:06 2010 +0000
+++ b/gameServer/NetRoutines.hs	Tue Jun 08 18:20:49 2010 +0000
@@ -10,6 +10,7 @@
 -----------------------------
 import CoreTypes
 import Utils
+import RoomsAndClients
 
 acceptLoop :: Socket -> Chan CoreMessage -> IO ()
 acceptLoop servSock chan = forever $ do
@@ -34,7 +35,7 @@
                     ""
                     False
                     0
-                    0
+                    lobbyId
                     0
                     False
                     False