Fix call to payWooOrder

This commit is contained in:
Rene Vergara 2022-12-06 14:35:13 -06:00
parent ac2ecd7368
commit 694b16bba5
Signed by: pitmutt
GPG key ID: 65122AD495A7F5B2

View file

@ -1153,8 +1153,8 @@ scanPayments config pipe = do
payWooOrder payWooOrder
(T.unpack wUrl) (T.unpack wUrl)
(C.pack iNum) (C.pack iNum)
(C.pack . show $ maybe "" show (q_id xO)) (C.pack $ maybe "" show (q_id xO))
(C.pack . show $ w_owner wt) (C.pack . show $ w_token wt)
(C.pack . show $ qprice xO) (C.pack . show $ qprice xO)
(C.pack . show $ qtotalZec xO) (C.pack . show $ qtotalZec xO)
else error else error