From 7e8a039477b416e7b348bffe6271fe4ca7dbe598 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 2672f1a3b05..4535a339fc5 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 @@ -138,7 +138,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 2dad179f8a0..ba89d90a11f 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 (())