Add a replacement module with deprecation

IntersectMBO · Dec 10, 2022 · e06928e · e06928e
1 parent 0cfb792
commit e06928e
Show file tree

Hide file tree

Showing 4 changed files with 10 additions and 2 deletions.
diff --git a/eras/shelley/impl/cardano-ledger-shelley.cabal b/eras/shelley/impl/cardano-ledger-shelley.cabal
@@ -50,6 +50,7 @@ library
     Cardano.Ledger.Shelley.Genesis
     Cardano.Ledger.Shelley.HardForks
     Cardano.Ledger.Shelley.LedgerState
+    Cardano.Ledger.Shelley.Metadata
     Cardano.Ledger.Shelley.Orphans
     Cardano.Ledger.Shelley.PoolRank
     Cardano.Ledger.Shelley.PoolParams

diff --git a/eras/shelley/impl/src/Cardano/Ledger/Shelley/Metadata.hs b/eras/shelley/impl/src/Cardano/Ledger/Shelley/Metadata.hs
@@ -0,0 +1,7 @@
+module Cardano.Ledger.Shelley.Metadata
+  {-# DEPRECATED "Use 'import Cardano.Ledger.Shelley.TxAuxData' instead" #-}
+  ( module X,
+  )
+where
+
+import Cardano.Ledger.Shelley.TxAuxData as X
diff --git a/eras/shelley/impl/src/Cardano/Ledger/Shelley/Tx.hs b/eras/shelley/impl/src/Cardano/Ledger/Shelley/Tx.hs
@@ -410,7 +410,7 @@ shelleyMinFeeTx pp tx =
   Coin $
     fromIntegral (getField @"_minfeeA" pp)
       * tx
-      ^. sizeTxF
+        ^. sizeTxF
       + fromIntegral (getField @"_minfeeB" pp)
 
 minfee ::

diff --git a/eras/shelley/test-suite/test/Test/Cardano/Ledger/Shelley/MultiSigExamples.hs b/eras/shelley/test-suite/test/Test/Cardano/Ledger/Shelley/MultiSigExamples.hs
@@ -51,7 +51,6 @@ import Cardano.Ledger.Shelley.LedgerState
     UTxOState,
     genesisState,
   )
-import Cardano.Ledger.Shelley.TxAuxData (ShelleyTxAuxData)
 import Cardano.Ledger.Shelley.PParams
   ( ShelleyPParams,
     ShelleyPParamsHKD (..),
@@ -67,6 +66,7 @@ import Cardano.Ledger.Shelley.Scripts
     pattern RequireSignature,
   )
 import Cardano.Ledger.Shelley.Tx (ShelleyTx (..), TxId)
+import Cardano.Ledger.Shelley.TxAuxData (ShelleyTxAuxData)
 import Cardano.Ledger.Shelley.TxBody
   ( ShelleyTxBody (..),
     ShelleyTxOut (..),