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

Add more debugging

This commit is contained in:
Rene Vergara 2023-10-13 14:53:33 -05:00
parent a3eb5d29ee
commit 4558dfb8da
Signed by: pitmutt
GPG Key ID: 65122AD495A7F5B2
1 changed files with 7 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
src/ZGoBackend.hs
View File

@ -2089,9 +2089,13 @@ scanTxNative config pipe = do
else error
"Couldn't parse externalInvoice for WooCommerce"
_ -> putStrLn "Not an integration order"
else liftIO $
access p master dbName $
markOrderPaid (T.unpack orderId, zamount x)
else do
print $
"Regular order" ++
T.unpack orderId ++ " " ++ show (zamount x)
liftIO $
access p master dbName $
markOrderPaid (T.unpack orderId, zamount x)
Left e -> print "Unable to parse order memo"
debug = flip trace