From fb73a5fc39e8f3ed65f0115822bba2039fc60925 Mon Sep 17 00:00:00 2001 From: Pablo Lamela Date: Thu, 2 May 2024 03:26:07 +0200 Subject: [PATCH] Apply stylish-haskell --- .../Testnet/Test/LedgerEvents/Gov/PredefinedAbstainDRep.hs | 2 +- .../Test/LedgerEvents/Gov/PredefinedNoConfidenceDRep.hs | 6 +++--- 2 files changed, 4 insertions(+), 4 deletions(-) diff --git a/cardano-testnet/test/cardano-testnet-test/Cardano/Testnet/Test/LedgerEvents/Gov/PredefinedAbstainDRep.hs b/cardano-testnet/test/cardano-testnet-test/Cardano/Testnet/Test/LedgerEvents/Gov/PredefinedAbstainDRep.hs index a9d3c16e7f7..c55b3514fea 100644 --- a/cardano-testnet/test/cardano-testnet-test/Cardano/Testnet/Test/LedgerEvents/Gov/PredefinedAbstainDRep.hs +++ b/cardano-testnet/test/cardano-testnet-test/Cardano/Testnet/Test/LedgerEvents/Gov/PredefinedAbstainDRep.hs @@ -136,7 +136,7 @@ data AutomaticDRepType = AlwaysAbstainDRep | NoConfidenceDRep delegateToAutomaticDRep - :: (HasCallStack, MonadTest m, MonadIO m, H.MonadAssertion m, MonadCatch m) + :: (HasCallStack, MonadTest m, MonadIO m, H.MonadAssertion m, MonadCatch m) => H.ExecConfig -- ^ Specifies the CLI execution configuration. -> EpochStateView -- ^ Current epoch state view for transaction building. It can be obtained -- using the 'getEpochStateView' function. diff --git a/cardano-testnet/test/cardano-testnet-test/Cardano/Testnet/Test/LedgerEvents/Gov/PredefinedNoConfidenceDRep.hs b/cardano-testnet/test/cardano-testnet-test/Cardano/Testnet/Test/LedgerEvents/Gov/PredefinedNoConfidenceDRep.hs index 61137ca43df..f88415a0a65 100644 --- a/cardano-testnet/test/cardano-testnet-test/Cardano/Testnet/Test/LedgerEvents/Gov/PredefinedNoConfidenceDRep.hs +++ b/cardano-testnet/test/cardano-testnet-test/Cardano/Testnet/Test/LedgerEvents/Gov/PredefinedNoConfidenceDRep.hs @@ -18,8 +18,8 @@ import qualified Cardano.Ledger.Conway.Governance as L import qualified Cardano.Ledger.Shelley.LedgerState as L import Cardano.Testnet import Cardano.Testnet.Test.LedgerEvents.Gov.PredefinedAbstainDRep - (desiredPoolNumberProposalTest, - getDesiredPoolNumberValue, voteChangeProposal, delegateToAutomaticDRep, AutomaticDRepType (..)) + (AutomaticDRepType (..), delegateToAutomaticDRep, desiredPoolNumberProposalTest, + getDesiredPoolNumberValue, voteChangeProposal) import Prelude @@ -30,7 +30,7 @@ import qualified Data.Map as Map import Data.String (fromString) import qualified Data.Text as Text import Data.Word (Word32) -import GHC.Stack (callStack, HasCallStack) +import GHC.Stack (HasCallStack, callStack) import Lens.Micro ((^.)) import System.FilePath (())