--- a/gameServer/NetRoutines.hs	Tue Feb 09 21:11:16 2016 +0300
+++ b/gameServer/NetRoutines.hs	Mon Mar 14 22:08:27 2016 +0300
@@ -81,6 +81,7 @@
                     newEventsInfo
                     0
                     []
+                    []
                     )
 
         writeChan chan $ Accept newClient