diff --git a/plutus-pab/src/Plutus/PAB/Arbitrary.hs b/plutus-pab/src/Plutus/PAB/Arbitrary.hs index eec0ea7f647..46a76859661 100644 --- a/plutus-pab/src/Plutus/PAB/Arbitrary.hs +++ b/plutus-pab/src/Plutus/PAB/Arbitrary.hs @@ -18,7 +18,7 @@ import qualified Ledger.Bytes as LedgerBytes import Ledger.Crypto (PubKey, PubKeyHash, Signature) import Ledger.Interval (Extended, Interval, LowerBound, UpperBound) import Ledger.Slot (Slot) -import Ledger.Tx (TxIn, TxInType, TxOutRef, TxOutType) +import Ledger.Tx (TxIn, TxInType, TxOutRef) import Ledger.TxId (TxId) import Plutus.Contract.Effects.AwaitSlot (WaitingForSlot (..)) import Plutus.Contract.Effects.AwaitTxConfirmed (TxConfirmed (..)) @@ -57,10 +57,6 @@ instance Arbitrary TxIn where arbitrary = genericArbitrary shrink = genericShrink -instance Arbitrary TxOutType where - arbitrary = genericArbitrary - shrink = genericShrink - instance Arbitrary TxOutRef where arbitrary = genericArbitrary shrink = genericShrink @@ -158,7 +154,7 @@ instance Arbitrary ContractPABRequest where ] instance Arbitrary Address where - arbitrary = oneof [PubKeyAddress <$> arbitrary, ScriptAddress <$> arbitrary] + arbitrary = oneof [Ledger.pubKeyAddress <$> arbitrary, Ledger.scriptAddress <$> arbitrary] instance Arbitrary ValidatorHash where arbitrary = ValidatorHash <$> arbitrary