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

Fix issue of multiple auth calls from WooCommerce

Browse source
This commit is contained in:
Rene Vergara 2022-12-02 14:43:52 -06:00
parent 3683567b81
commit be716378f0
Signed by: pitmutt
GPG key ID: 65122AD495A7F5B2
1 changed files with 20 additions and 8 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

28
src/ZGoBackend.hs
View file

@ -644,14 +644,26 @@ routes pipe config = do
, "message" .= ("Authorized!" :: String) , "message" .= ("Authorized!" :: String)
]) ])
else do else do
status accepted202 if (E.decodeUtf8With lenientDecode .
Web.Scotty.json B64.decodeLenient . C.pack . T.unpack)
(object siteurl ==
[ "authorized" .= False fromMaybe "" (w_url c)
, "message" .= then do
("ZGo shop already linked to" <> status ok200
fromMaybe "" (w_url c)) Web.Scotty.json
]) (object
[ "authorized" .= True
, "message" .= ("Already authorized." :: String)
])
else do
status accepted202
Web.Scotty.json
(object
[ "authorized" .= False
, "message" .=
("ZGo shop already linked to " <>
fromMaybe "" (w_url c))
])
else do else do
status accepted202 status accepted202
Web.Scotty.json Web.Scotty.json