Merge pull request #946 from IntersectMBO/mgalazyn/chore/upgrade-card…

…ano-api-10.1.0.0

Upgrade cardano-api-10.1.0.0

cabal.project

@@ -14,7 +14,7 @@ repository cardano-haskell-packages
 -- you need to run if you change them
 index-state:
   , hackage.haskell.org 2024-10-11T15:49:11Z
-  , cardano-haskell-packages 2024-10-16T12:44:42Z
+  , cardano-haskell-packages 2024-10-21T14:11:57Z
 
 packages:
   cardano-cli

cardano-cli/cardano-cli.cabal

@@ -196,7 +196,7 @@ library
     binary,
     bytestring,
     canonical-json,
-    cardano-api ^>=10.0,
+    cardano-api ^>=10.1,
     cardano-binary,
     cardano-crypto,
     cardano-crypto-class ^>=2.1.2,

cardano-cli/src/Cardano/CLI/Byron/Tx.hs

@@ -179,7 +179,7 @@ txSpendUTxOByronPBFT nId sk txIns outs = do
        in makeSignedByronTransaction [bWit] txBody
 
 fromByronWitness
-  :: Byron.SomeByronSigningKey -> NetworkId -> L.Annotated L.Tx ByteString -> KeyWitness ByronEra
+  :: Byron.SomeByronSigningKey -> NetworkId -> L.Annotated Byron.Tx ByteString -> KeyWitness ByronEra
 fromByronWitness bw nId txBody =
   case bw of
     Byron.AByronSigningKeyLegacy sk -> makeByronKeyWitness nId txBody sk

cardano-cli/src/Cardano/CLI/EraBased/Options/StakePool.hs

@@ -19,7 +19,6 @@ import qualified Cardano.CLI.Commands.Hash as Cmd
 import           Cardano.CLI.Environment (EnvCli (..))
 import qualified Cardano.CLI.EraBased.Commands.StakePool as Cmd
 import           Cardano.CLI.EraBased.Options.Common
-import qualified Cardano.Ledger.SafeHash as L
 
 import qualified Data.Foldable as F
 import           Options.Applicative hiding (help, str)

cardano-cli/src/Cardano/CLI/EraBased/Run/Query.hs

@@ -55,7 +55,6 @@ import           Cardano.CLI.Types.Output (QueryDRepStateOutput (..))
 import qualified Cardano.CLI.Types.Output as O
 import           Cardano.Crypto.Hash (hashToBytesAsHex)
 import qualified Cardano.Crypto.Hash.Blake2b as Blake2b
-import qualified Cardano.Ledger.Shelley.LedgerState as L
 import           Cardano.Slotting.EpochInfo (EpochInfo (..), epochInfoSlotToUTCTime, hoistEpochInfo)
 import           Ouroboros.Consensus.BlockchainTime.WallClock.Types (RelativeTime (..),
                    toRelativeTime)

cardano-cli/src/Cardano/CLI/EraBased/Run/Transaction.hs

@@ -51,7 +51,6 @@ import           Cardano.CLI.Types.Errors.TxCmdError
 import           Cardano.CLI.Types.Errors.TxValidationError
 import           Cardano.CLI.Types.Output (renderScriptCosts)
 import           Cardano.CLI.Types.TxFeature
-import qualified Cardano.Ledger.Api.PParams as L
 import qualified Ouroboros.Network.Protocol.LocalStateQuery.Type as Consensus
 import qualified Ouroboros.Network.Protocol.LocalTxSubmission.Client as Net.Tx
 

cardano-cli/src/Cardano/CLI/Helpers.hs

@@ -126,7 +126,7 @@ validateCBOR cborObject bs =
       void $ decodeCBOR bs (L.fromCBOR :: L.Decoder s Byron.Certificate)
       Right "Valid Byron delegation certificate."
     CBORTxByron -> do
-      void $ decodeCBOR bs (L.fromCBOR :: L.Decoder s L.Tx)
+      void $ decodeCBOR bs (L.fromCBOR :: L.Decoder s Byron.Tx)
       Right "Valid Byron Tx."
     CBORUpdateProposalByron -> do
       void $ decodeCBOR bs (L.fromCBOR :: L.Decoder s Byron.Proposal)