Skip to content

Commit 7cff2e9

Browse files
committed
formatting fix
1 parent 38fab81 commit 7cff2e9

File tree

1 file changed

+5
-5
lines changed

1 file changed

+5
-5
lines changed

src/BotPlutusInterface/TimeSlot.hs

Lines changed: 5 additions & 5 deletions
Original file line numberDiff line numberDiff line change
@@ -23,8 +23,10 @@ import BotPlutusInterface.Types (
2323
)
2424
import Cardano.Api (CardanoMode, EraHistory)
2525
import Cardano.Api qualified as CAPI
26-
import Cardano.Ledger.Alonzo.PParams (_protocolVersion, PParams)
26+
import Cardano.Ledger.Alonzo (AlonzoEra)
27+
import Cardano.Ledger.Alonzo.PParams (PParams, _protocolVersion)
2728
import Cardano.Ledger.Alonzo.TxInfo (slotToPOSIXTime)
29+
import Cardano.Ledger.Crypto (StandardCrypto)
2830
import Cardano.Ledger.Slot (EpochInfo)
2931
import Cardano.Slotting.EpochInfo (hoistEpochInfo)
3032
import Cardano.Slotting.Time (SystemStart, toRelativeTime)
@@ -53,8 +55,6 @@ import Ouroboros.Consensus.HardFork.History qualified as Consensus
5355
import Ouroboros.Consensus.HardFork.History.Qry qualified as HF
5456
import System.Environment (getEnv)
5557
import Prelude
56-
import Cardano.Ledger.Crypto (StandardCrypto)
57-
import Cardano.Ledger.Alonzo (AlonzoEra)
5858

5959
-- | Error returned by the functions of this module
6060
data TimeSlotConversionError
@@ -134,7 +134,7 @@ posixTimeRangeToContainedSlotRangeIO
134134

135135
pure range
136136
where
137-
-- helper to convert `Extended POSIXTime` to `Extended Slot`
137+
-- helper to convert `Extended POSIXTime` to `Extended Slot`
138138
-- using `posixTimeToSlot`
139139
convertExtended ::
140140
Monad m =>
@@ -153,7 +153,7 @@ posixTimeRangeToContainedSlotRangeIO
153153
-- https://github.com/input-output-hk/plutus-apps/blob/e51f57fa99f4cc0942ba6476b0689e43f0948eb3/plutus-ledger/src/Ledger/TimeSlot.hs#L125-L130
154154
getExtClosure ::
155155
PParams (AlonzoEra StandardCrypto) ->
156-
EpochInfo (Either CAPI.TransactionValidityError) ->
156+
EpochInfo (Either CAPI.TransactionValidityError) ->
157157
SystemStart ->
158158
Extended Ledger.Slot ->
159159
Bool -> -- current `Closure` of lower or upper bound of `Ledger.POSIXTimeRange`

0 commit comments

Comments
 (0)