Vergara_Tech/zgo-backend
Vergara_Tech/zgo-backend
2
1
Fork 0
Code Issues Pull requests Projects Releases 4 Packages Wiki Activity

Fix new endpoint for login language

Browse source
This commit is contained in:
Rene Vergara 2023-05-10 15:24:16 -05:00
parent 0afcaed076
commit e80411d8bd
Signed by: pitmutt
GPG key ID: 65122AD495A7F5B2
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
src/ZGoBackend.hs
View file

@ -1133,7 +1133,7 @@ routes pipe config = do
liftAndCatchIO $ run (deleteOrder oId) liftAndCatchIO $ run (deleteOrder oId)
status ok200 status ok200
-- Get language for component -- Get language for component
get "getloginlang" $ do get "/getloginlang" $ do
lang <- param "lang" lang <- param "lang"
txtPack' <- liftAndCatchIO $ run (findLangComponent lang "login") txtPack' <- liftAndCatchIO $ run (findLangComponent lang "login")
case cast' . Doc =<< txtPack' of case cast' . Doc =<< txtPack' of