diff --git a/lib/wallet/src/Cardano/Wallet/Write/Tx.hs b/lib/wallet/src/Cardano/Wallet/Write/Tx.hs index 6486391cd4b..d1f7a3ed41a 100644 --- a/lib/wallet/src/Cardano/Wallet/Write/Tx.hs +++ b/lib/wallet/src/Cardano/Wallet/Write/Tx.hs @@ -944,8 +944,7 @@ withCLIConstraint era a = case era of withAlonzoScriptConstraint :: RecentEra era -> ( Core.Script (Cardano.ShelleyLedgerEra era) - ~ Alonzo.Script (Cardano.ShelleyLedgerEra era - ) + ~ AlonzoScript (Cardano.ShelleyLedgerEra era) => a) -> a withAlonzoScriptConstraint era a = case era of