Mercurial Mercurial > hedgewars / changeset
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | raw | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Buggy executeMany?
authorunc0rr
Wed, 10 Jun 2015 23:05:38 +0300
changeset 10990 c99385e4654d
parent 10989 0ea100eefae7
child 10991 189b2370353d
Buggy executeMany?
gameServer/OfficialServer/extdbinterface.hs file | annotate | diff | comparison | revisions 
--- 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
hedgewars