diff --git a/cardano-cli/src/Cardano/CLI/EraBased/Run/Transaction.hs b/cardano-cli/src/Cardano/CLI/EraBased/Run/Transaction.hs index 2c1d4ad94d..841e766241 100644 --- a/cardano-cli/src/Cardano/CLI/EraBased/Run/Transaction.hs +++ b/cardano-cli/src/Cardano/CLI/EraBased/Run/Transaction.hs @@ -1073,7 +1073,7 @@ convertCertificates sbe certsAndScriptWitnesses = TxCertificates sbe certs $ BuildTxWith reqWits where certs = map fst certsAndScriptWitnesses - reqWits = Map.fromList $ mapMaybe convert certsAndScriptWitnesses + reqWits = mapMaybe convert certsAndScriptWitnesses convert :: (Certificate era, Maybe (ScriptWitness WitCtxStake era)) -> Maybe (StakeCredential, Witness WitCtxStake era)