Fix issue of multiple auth calls from WooCommerce
This commit is contained in:
parent
3683567b81
commit
be716378f0
1 changed files with 20 additions and 8 deletions
|
@ -643,13 +643,25 @@ routes pipe config = do
|
|||
[ "authorized" .= True
|
||||
, "message" .= ("Authorized!" :: String)
|
||||
])
|
||||
else do
|
||||
if (E.decodeUtf8With lenientDecode .
|
||||
B64.decodeLenient . C.pack . T.unpack)
|
||||
siteurl ==
|
||||
fromMaybe "" (w_url c)
|
||||
then do
|
||||
status ok200
|
||||
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" <>
|
||||
("ZGo shop already linked to " <>
|
||||
fromMaybe "" (w_url c))
|
||||
])
|
||||
else do
|
||||
|
|
Loading…
Reference in a new issue