--- a/gameServer/OfficialServer/extdbinterface.hs Mon Jun 08 08:21:09 2015 -0400
+++ b/gameServer/OfficialServer/extdbinterface.hs Wed Jun 10 23:05:38 2015 +0300
@@ -83,9 +83,8 @@
SendStats clients rooms ->
void $ execute dbConn dbQueryStats (clients, rooms)
---StoreAchievements (B.pack fileName) (map toPair teams) info
StoreAchievements p fileName teams info ->
- void $ executeMany dbConn dbQueryAchievement $ (parseStats p fileName teams) info
+ mapM_ (execute dbConn dbQueryAchievement) $ (parseStats p fileName teams) info
readTime = read . B.unpack . B.take 19 . B.drop 8