fixup

cardano-scaling · Jan 6, 2025 · f92ac2c · f92ac2c
1 parent e943520
commit f92ac2c
Showing 1 changed file with 6 additions and 6 deletions.
diff --git a/hydra-cluster/src/Hydra/Cluster/Scenarios.hs b/hydra-cluster/src/Hydra/Cluster/Scenarios.hs
@@ -451,11 +451,11 @@ singlePartyUsesSchnorrkelScriptOnL2 tracer workDir node hydraScriptsTxId =
                 mkScriptWitness serializedScript (mkScriptDatum ()) (toScriptData ())
       let tx =
             unsafeBuildTransaction $
-              emptyTxBody
+              defaultTxBodyContent
                 & changePParams pparams
-                & addInputs ([(scriptInput, scriptWitness)] <> normalInput)
-                & addCollateralInput collateralInput
-                & addOutputs [scriptOutput, returnOutput]
+                & addTxIns ([(scriptInput, scriptWitness)] <> normalInput)
+                & addTxInsCollateral collateralInput
+                & addTxOuts [scriptOutput, returnOutput]
                 & setTxFee (TxFeeExplicit $ Coin 173_465)
       let signedL2tx = signTx walletSk tx
       send n1 $ input "NewTx" ["transaction" .= signedL2tx]
@@ -483,8 +483,8 @@ singlePartyUsesSchnorrkelScriptOnL2 tracer workDir node hydraScriptsTxId =
               mkScriptWitness serializedScript (mkScriptDatum ()) (toScriptData ())
     let spendingTx =
           unsafeBuildTransaction $
-            emptyTxBody
-              & addInputs [(scriptIn, scriptWitness)]
+            defaultTxBodyContent
+              & addTxIns [(scriptIn, scriptWitness)]
     pure
       ( Aeson.object
           [ "blueprintTx" .= spendingTx