Add batch load of translation

src/ZGoBackend.hs

@@ -1039,7 +1039,9 @@ routes pipe config = do
         Web.Scotty.json $ toJSON (tP :: LangComponent)
   post "/api/setlang" $ do
     langComp <- jsonData
-    _ <- liftAndCatchIO $ run (loadLangComponent langComp)
+    _ <-
+      liftAndCatchIO $
+      mapM (run . loadLangComponent) (langComp :: [LangComponent])
     status created201
 
 -- | Make a Zcash RPC call