From 4558dfb8da75fae6f46268e002479126d5de4fd8 Mon Sep 17 00:00:00 2001
From: Rene Vergara <rene@vergara.network>
Date: Fri, 13 Oct 2023 14:53:33 -0500
Subject: [PATCH] Add more debugging

---
 src/ZGoBackend.hs | 10 +++++++---
 1 file changed, 7 insertions(+), 3 deletions(-)

diff --git a/src/ZGoBackend.hs b/src/ZGoBackend.hs
index 112ce2a..448fff5 100644
--- a/src/ZGoBackend.hs
+++ b/src/ZGoBackend.hs
@@ -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