Mercurial Mercurial > hedgewars / diff
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | file | latest | revisions | annotate | diff | comparison | raw | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
gameServer/ServerCore.hs
changeset 3657 fa3bf50d0338
parent 3566 772a46ef8288
child 3671 a94d1dc4a8d9 
--- a/gameServer/ServerCore.hs	Mon Jul 19 23:30:08 2010 +0400
+++ b/gameServer/ServerCore.hs	Mon Jul 19 23:31:08 2010 +0400
@@ -59,10 +59,8 @@
                 processAction (ProcessAccountInfo info)
 
         TimerAction tick ->
-            return ()
-            --liftM snd $
-            --    foldM processAction (0, serverInfo, rnc) $
-            --        PingAll : [StatsAction | even tick]
+                mapM_ processAction $
+                    PingAll : [StatsAction | even tick]
 
 
 startServer :: ServerInfo -> Socket -> IO ()
hedgewars