# HG changeset patch
# User unc0rr
# Date 1305568994 -14400
# Node ID 8ebf920144470a0a3ce362dc5e3712b057f9643b
# Parent  a5329e52a71b6f94ed9571f4daba3ac7007abd21
Don't send stats after spawning new server

diff -r a5329e52a71b -r 8ebf92014447 gameServer/Actions.hs
--- a/gameServer/Actions.hs	Sun May 15 18:16:13 2011 +0400
+++ b/gameServer/Actions.hs	Mon May 16 22:03:14 2011 +0400
@@ -466,8 +466,9 @@
 
 
 processAction StatsAction = do
+    si <- gets serverInfo
+    when (not $ shutdownPending si) $ do
     rnc <- gets roomsClients
-    si <- gets serverInfo
     (roomsNum, clientsNum) <- io $ withRoomsAndClients rnc st
     io $ writeChan (dbQueries si) $ SendStats clientsNum (roomsNum - 1)
     where