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

Add debugging to WooCommerce endpoint

Browse source
This commit is contained in:
Rene Vergara 2023-06-23 11:45:07 -05:00
parent 7672cdc083
commit 5ffb1b4a83
Signed by: pitmutt
GPG key ID: 65122AD495A7F5B2
1 changed files with 3 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
src/WooCommerce.hs
View file

@ -103,7 +103,9 @@ payWooOrder u i o t p z = do
res <- httpLBS req res <- httpLBS req
if getResponseStatus res == ok200 if getResponseStatus res == ok200
then return () then return ()
else error "Failed to report payment to WooCommerce" else do
print $ getResponseStatus res
error "Failed to report payment to WooCommerce"
generateWooToken :: Owner -> String -> Action IO () generateWooToken :: Owner -> String -> Action IO ()
generateWooToken o s = generateWooToken o s =