# HG changeset patch # User unc0rr # Date 1354308252 -14400 # Node ID 5da1c26d5b100705c4b3a189c3b70331e2bc4cfe # Parent 695f1eef72c87d01aa81e48a50ba0493de1b2456 Fix warning diff -r 695f1eef72c8 -r 5da1c26d5b10 gameServer/Actions.hs --- a/gameServer/Actions.hs Sat Dec 01 00:38:06 2012 +0400 +++ b/gameServer/Actions.hs Sat Dec 01 00:44:12 2012 +0400 @@ -155,7 +155,7 @@ when loggedIn $ processAction $ AnswerClients clientsChans ["LOBBY:LEFT", clNick, msg] - mapM processAction + mapM_ processAction [ AnswerClients [chan] ["BYE", msg] , ModifyClient (\c -> c{nick = "", logonPassed = False}) -- this will effectively hide client from others while he isn't deleted from list