Fix compilation errors

input-output-hk · Jan 18, 2022 · 1cf217c · 1cf217c
1 parent 2e08c66
commit 1cf217c
Showing 1 changed file with 2 additions and 7 deletions.
diff --git a/hydra-node/test/Hydra/Chain/Direct/ContractSpec.hs b/hydra-node/test/Hydra/Chain/Direct/ContractSpec.hs
@@ -52,7 +52,7 @@ import Hydra.Ledger.Cardano (
   TxBodyScriptData (TxBodyNoScriptData, TxBodyScriptData),
   TxIn,
   TxOut (..),
-  Utxo(..),
+  Utxo,
   adaOnly,
   describeCardanoTx,
   fromLedgerTx,
@@ -65,12 +65,8 @@ import Hydra.Ledger.Cardano (
   genValue,
   getOutputs,
   hashTxOuts,
-  lovelaceToTxOutValue,
   lovelaceToValue,
-  mkDatumForTxIn,
-  mkRedeemerForTxIn,
   mkScriptAddress,
-  mkScriptWitness,
   mkTxOutDatum,
   mkTxOutDatumHash,
   mkTxOutValue,
@@ -80,7 +76,6 @@ import Hydra.Ledger.Cardano (
   toLedgerTxIn,
   toLedgerTxOut,
   txOutValue,
-  unsafeBuildTransaction,
   utxoPairs,
  )
 import qualified Hydra.Ledger.Cardano as Api
@@ -295,7 +290,7 @@ healthyCollectComTx =
   tx =
     collectComTx
       Fixture.testNetworkId
-      (Utxo $ Map.fromList committedUtxo)
+      (Api.Utxo $ Map.fromList committedUtxo)
       (headInput, headDatum, healthyCollectComOnChainParties)
       commits