Remove unused Context._feeEstimator field

cardano-foundation · May 26, 2023 · 2e099d9 · 2e099d9
1 parent af82118
commit 2e099d9
Show file tree

Hide file tree

Showing 3 changed files with 0 additions and 6 deletions.
diff --git a/lib/wallet/bench/latency-bench.hs b/lib/wallet/bench/latency-bench.hs
@@ -471,7 +471,6 @@ withShelleyServer tracers action = do
                 , _manager = manager
                 , _walletPort = Port . fromIntegral $ portFromURL baseUrl
                 , _faucet = faucet
-                , _feeEstimator = \_ -> error "feeEstimator not available"
                 , _networkParameters = np
                 , _poolGarbageCollectionEvents =
                     error "poolGarbageCollectionEvents not available"

diff --git a/lib/wallet/integration/src/Test/Integration/Framework/Context.hs b/lib/wallet/integration/src/Test/Integration/Framework/Context.hs
@@ -33,8 +33,6 @@ import Network.HTTP.Client
     ( Manager )
 import Network.URI
     ( URI )
-import Numeric.Natural
-    ( Natural )
 import Test.Integration.Faucet
     ( Faucet )
 
@@ -57,8 +55,6 @@ data Context = Context
         :: (ByteString, Coin)
         -> IO ()
         -- ^ A function to inject rewards into some stake address.
-    , _feeEstimator :: TxDescription -> (Natural, Natural)
-        -- ^ A fee estimator.
     , _networkParameters :: NetworkParameters
         -- ^ Blockchain parameters for the underlying chain.
     , _poolGarbageCollectionEvents

diff --git a/lib/wallet/test/integration/shelley-integration-test.hs b/lib/wallet/test/integration/shelley-integration-test.hs
@@ -272,7 +272,6 @@ specWithServer testDir (tr, tracers) = aroundAll withContext
                     , _manager = (baseUrl, manager)
                     , _walletPort = Port . fromIntegral $ portFromURL baseUrl
                     , _faucet = faucet
-                    , _feeEstimator = error "feeEstimator: unused in shelley specs"
                     , _networkParameters = np
                     , _poolGarbageCollectionEvents = poolGarbageCollectionEvents
                     , _mainEra = clusterToApiEra era