diff -r 30748b1d9ec7 -r 4fd5df03deb8 gameServer/OfficialServer/DBInteraction.hs --- a/gameServer/OfficialServer/DBInteraction.hs Thu Aug 29 12:12:19 2013 +0400 +++ b/gameServer/OfficialServer/DBInteraction.hs Tue Sep 03 00:05:38 2013 +0400 @@ -77,6 +77,14 @@ writeChan cChan $ ClientAccountInfo clId clUid (snd $ fromJust cacheEntry) return (accountsCache, req) + GetReplayName {} -> do + SIO.hPutStrLn hIn $ show q + hFlush hIn + + (clId', clUid', accountInfo) <- SIO.hGetLine hOut >>= (maybeException . maybeRead) + + writeChan cChan $ ClientAccountInfo clId' clUid' accountInfo + ClearCache -> return (Map.empty, req) StoreAchievements {} -> ( (SIO.hPutStrLn hIn $ show q) >>