Extend toJSON and fromJSON to all payload types

Concordium · May 10, 2024 · 6baba61 · 6baba61
1 parent ff9313b
commit 6baba61
Show file tree

Hide file tree

Showing 2 changed files with 1 addition and 2 deletions.
diff --git a/deps/concordium-base b/deps/concordium-base
diff --git a/src/Concordium/Client/Runner.hs b/src/Concordium/Client/Runner.hs
@@ -674,7 +674,6 @@ writeSignedTransactionToFile tx outFile verbose overwriteSetting = do
     let signedTransaction =
             Types.SignedTransaction
                 Types.signedTransactionVersion
-                (Types.getTransactionType jsonPayload)
                 (Types.thEnergyAmount header)
                 (Types.thExpiry header)
                 (Types.thNonce header)
+6 −0		haskell-src/Concordium/Crypto/EncryptedTransfers.hs
+3 −0		haskell-src/Concordium/ID/Types.hs
+21 −0		haskell-src/Concordium/Types/Execution.hs
+12 −51		haskell-src/Concordium/Types/Transactions.hs
+7 −0		haskell-src/Concordium/Wasm.hs