changeset 9399 | 1767c92eff37 |
parent 7331 | 0e50456d652c |
child 9446 | 4fd5df03deb8 |
--- a/gameServer/OfficialServer/DBInteraction.hs Tue Aug 06 00:26:07 2013 +0400 +++ b/gameServer/OfficialServer/DBInteraction.hs Sat Aug 17 23:38:53 2013 +0400 @@ -78,6 +78,12 @@ return (accountsCache, req) ClearCache -> return (Map.empty, req) + StoreAchievements {} -> ( + (SIO.hPutStrLn hIn $ show q) >> + hFlush hIn >> + return (accountsCache, req)) + `Exception.onException` + (unGetChan queries q) SendStats {} -> ( (SIO.hPutStrLn hIn $ show q) >> hFlush hIn >>