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

Unified Address support #8

Merged
pitmutt merged 61 commits from dev18 into master 2023-10-28 12:24:28 +00:00
Conversation 0 Commits 61 Files changed 11 +7 -3
1 changed files with 7 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files
Showing only changes of commit 4558dfb8da - Show all commits

10
src/ZGoBackend.hs
View file

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