# HG changeset patch
# User unc0rr
# Date 1341002091 -14400
# Node ID 0e50456d652c1357d2afd639b08ad3e0537a0acd
# Parent  92b6d8ae99e49afbe36f9005bfdbc78e480bb0a0
Well, since we have database on the same computer as game server, could remove caching, but I just set expiration time to 10 minutes

diff -r 92b6d8ae99e4 -r 0e50456d652c gameServer/OfficialServer/DBInteraction.hs
--- a/gameServer/OfficialServer/DBInteraction.hs	Sat Jun 30 00:20:01 2012 +0400
+++ b/gameServer/OfficialServer/DBInteraction.hs	Sat Jun 30 00:34:51 2012 +0400
@@ -60,7 +60,7 @@
         CheckAccount clId clUid clNick _ -> do
             let cacheEntry = clNick `Map.lookup` accountsCache
             currentTime <- getCurrentTime
-            if (isNothing cacheEntry) || (currentTime `diffUTCTime` (fst . fromJust) cacheEntry > 2 * 24 * 60 * 60) then
+            if (isNothing cacheEntry) || (currentTime `diffUTCTime` (fst . fromJust) cacheEntry > 10 * 60) then
                 do
                     SIO.hPutStrLn hIn $ show q
                     hFlush hIn