--- a/gameServer/NetRoutines.hs Mon Dec 28 21:21:02 2015 +0300 +++ b/gameServer/NetRoutines.hs Mon Dec 28 21:51:12 2015 +0300 @@ -79,6 +79,7 @@ newEventsInfo newEventsInfo 0 + [] ) writeChan chan $ Accept newClient