--- a/gameServer/NetRoutines.hs Fri Oct 02 18:56:54 2009 +0000 +++ b/gameServer/NetRoutines.hs Sat Oct 03 09:35:14 2009 +0000 @@ -46,6 +46,7 @@ False False undefined + undefined ) writeChan coreChan $ Accept newClient