diff --git a/src/ZGoBackend.hs b/src/ZGoBackend.hs index 16f3298..887dfff 100644 --- a/src/ZGoBackend.hs +++ b/src/ZGoBackend.hs @@ -1861,7 +1861,7 @@ scanTxNative pipe db nodeUser nodePwd = do nodeUser nodePwd "getrawtransaction" - [Data.Aeson.String txid] + [Data.Aeson.String txid, Number $ SC.scientific 1 0] let content = getResponseBody txInfo :: RpcResponse RawTxResponse if isNothing (err content) then return $ result content