merge master

kadena-io · Nov 20, 2023 · 77517a8 · 77517a8
1 parent 28630f5
commit 77517a8
Show file tree

Hide file tree

Showing 2 changed files with 3 additions and 3 deletions.
diff --git a/test/Chainweb/Test/Pact/PactSingleChainTest.hs b/test/Chainweb/Test/Pact/PactSingleChainTest.hs
@@ -317,7 +317,7 @@ pactStateSamePreAndPostCompaction rdb =
 
     let makeTx :: Int -> BlockHeader -> IO ChainwebTransaction
         makeTx nth bh = buildCwCmd
-          $ set cbSigners [mkSigner' sender00 [mkGasCap, mkTransferCap "sender00" "sender01" 1.0]]
+          $ set cbSigners [mkEd25519Signer' sender00 [mkGasCap, mkTransferCap "sender00" "sender01" 1.0]]
           $ setFromHeader bh
           $ mkCmd (sshow (nth, bh))
           $ mkExec' "(coin.transfer \"sender00\" \"sender01\" 1.0)"
@@ -389,7 +389,7 @@ compactionIsIdempotent rdb =
 
     let makeTx :: Int -> BlockHeader -> IO ChainwebTransaction
         makeTx nth bh = buildCwCmd
-          $ set cbSigners [mkSigner' sender00 [mkGasCap, mkTransferCap "sender00" "sender01" 1.0]]
+          $ set cbSigners [mkEd25519Signer' sender00 [mkGasCap, mkTransferCap "sender00" "sender01" 1.0]]
           $ setFromHeader bh
           $ mkCmd (sshow (nth, bh))
           $ mkExec' "(coin.transfer \"sender00\" \"sender01\" 1.0)"

diff --git a/test/Chainweb/Test/Pact/RemotePactTest.hs b/test/Chainweb/Test/Pact/RemotePactTest.hs
@@ -249,7 +249,7 @@ txlogsCompactionTest :: Pact.TxCreationTime -> ClientEnv -> FilePath -> IO ()
 txlogsCompactionTest t cenv pactDbDir = do
     let cmd :: Text -> Text -> CmdBuilder
         cmd nonce tx = do
-          set cbSigners [mkSigner' sender00 []]
+          set cbSigners [mkEd25519Signer' sender00 []]
             $ set cbTTL defaultMaxTTL
             $ set cbCreationTime t
             $ set cbChainId cid