# HG changeset patch
# User unc0rr
# Date 1383247626 -14400
# Node ID 788fd9eedfb077e73f027f82dc3184c31c58818e
# Parent  267c0005baafb40e940bf6bf784b46f2372d5cfb
Fix 'non-exhaustive pattern' server crash

diff -r 267c0005baaf -r 788fd9eedfb0 gameServer/OfficialServer/DBInteraction.hs
--- a/gameServer/OfficialServer/DBInteraction.hs	Thu Oct 31 10:46:52 2013 -0400
+++ b/gameServer/OfficialServer/DBInteraction.hs	Thu Oct 31 23:27:06 2013 +0400
@@ -49,6 +49,8 @@
                 writeChan (coreChan si) $ ClientAccountInfo clId clUid (if clHost `L.elem` localAddressList then Admin else Guest)
             ClearCache -> return ()
             SendStats {} -> return ()
+            GetReplayName {} -> return ()
+            StoreAchievements {} -> return ()
         flushRequests si
 
 pipeDbConnectionLoop :: Chan DBQuery -> Chan CoreMessage -> Handle -> Handle -> Map.Map ByteString (UTCTime, AccountInfo) -> Int -> IO (Map.Map ByteString (UTCTime, AccountInfo), Int)