From 798216f986492e01930c8b482d7c1e868f2eb9c1 Mon Sep 17 00:00:00 2001
From: Daniel Firth <daniel.firth@iohk.io>
Date: Sun, 8 Dec 2024 14:51:56 +0000
Subject: [PATCH] Remove unused defaultProtocolParameters

---
 hydra-cluster/hydra-cluster.cabal    | 1 -
 hydra-cluster/src/Hydra/Generator.hs | 4 ----
 2 files changed, 5 deletions(-)

diff --git a/hydra-cluster/hydra-cluster.cabal b/hydra-cluster/hydra-cluster.cabal
index 5fc922554bd..66d6c9c4f18 100644
--- a/hydra-cluster/hydra-cluster.cabal
+++ b/hydra-cluster/hydra-cluster.cabal
@@ -90,7 +90,6 @@ library
     , cardano-slotting
     , containers
     , contra-tracer
-    , data-default
     , directory
     , filepath
     , http-conduit
diff --git a/hydra-cluster/src/Hydra/Generator.hs b/hydra-cluster/src/Hydra/Generator.hs
index 0324fb454d3..1fdf71bafb7 100644
--- a/hydra-cluster/src/Hydra/Generator.hs
+++ b/hydra-cluster/src/Hydra/Generator.hs
@@ -7,7 +7,6 @@ import Cardano.Api.UTxO qualified as UTxO
 import CardanoClient (QueryPoint (QueryTip), buildTransaction, mkGenesisTx, queryUTxOFor)
 import Control.Monad (foldM)
 import Data.Aeson (object, withObject, (.:), (.=))
-import Data.Default (def)
 import Hydra.Cluster.Faucet (FaucetException (..))
 import Hydra.Cluster.Fixture (availableInitialFunds)
 import Hydra.Ledger.Cardano (mkTransferTx)
@@ -87,9 +86,6 @@ instance FromJSON ClientDataset where
     parseSigningKey =
       either (fail . show) pure . deserialiseFromTextEnvelope (AsSigningKey AsPaymentKey)
 
-defaultProtocolParameters :: PParams LedgerEra
-defaultProtocolParameters = def
-
 -- | Generate a 'Dataset' which does not grow the per-client UTXO set over time.
 -- This version provided faucet key owns funds on the initial funds of the
 -- devnet (See 'availableInitialFunds' and 'genesis-shelley.json'). Then for a