Skip to content

Commit 731127c

Browse files
jonathanknowlesjonathanknowles
committed
Run stylish-haskell version 0.14.5.0.
1 parent 393397b commit 731127c

File tree

36 files changed

+85
-86
lines changed

36 files changed

+85
-86
lines changed

‎lib/address-derivation-discovery/lib/Cardano/Wallet/Address/Derivation.hs

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -157,8 +157,8 @@ import Data.Text.Class
157157
, toTextFromBoundedEnum
158158
)
159159
import Data.Type.Equality
160-
( (:~:) (..)
161-
, testEquality
160+
( testEquality
161+
, (:~:) (..)
162162
)
163163
import Data.Word
164164
( Word32

‎lib/balance-tx/lib/internal/Internal/Cardano/Write/Tx.hs

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -245,8 +245,8 @@ import Data.Maybe
245245
, isJust
246246
)
247247
import Data.Type.Equality
248-
( (:~:) (Refl)
249-
, TestEquality (testEquality)
248+
( TestEquality (testEquality)
249+
, (:~:) (Refl)
250250
)
251251
import Data.Typeable
252252
( Typeable

‎lib/balance-tx/lib/internal/Internal/Cardano/Write/Tx/Balance.hs

Lines changed: 8 additions & 8 deletions
Original file line numberDiff line numberDiff line change
@@ -176,8 +176,8 @@ import Data.Semigroup.Cancellative
176176
( Reductive ((</>))
177177
)
178178
import Data.Type.Equality
179-
( (:~:) (..)
180-
, testEquality
179+
( testEquality
180+
, (:~:) (..)
181181
)
182182
import Fmt
183183
( Buildable
@@ -281,41 +281,41 @@ import Text.Pretty.Simple
281281

282282
import qualified Cardano.Address.Script as CA
283283
import qualified Cardano.Api as Cardano
284-
import qualified Cardano.Api.Byron as Cardano
285284
import qualified Cardano.Api.Byron as Byron
285+
import qualified Cardano.Api.Byron as Cardano
286286
import qualified Cardano.Api.Shelley as Cardano
287287
import qualified Cardano.CoinSelection.UTxOIndex as UTxOIndex
288288
import qualified Cardano.CoinSelection.UTxOSelection as UTxOSelection
289289
import qualified Cardano.Ledger.Core as Core
290290
import qualified Cardano.Wallet.Primitive.Types.Address as W
291291
( Address
292292
)
293-
import qualified Cardano.Wallet.Primitive.Types.Coin as W.Coin
294293
import qualified Cardano.Wallet.Primitive.Types.Coin as W
295294
( Coin (..)
296295
)
297-
import qualified Cardano.Wallet.Primitive.Types.TokenBundle as W.TokenBundle
296+
import qualified Cardano.Wallet.Primitive.Types.Coin as W.Coin
298297
import qualified Cardano.Wallet.Primitive.Types.TokenBundle as W
299298
( TokenBundle (..)
300299
)
301-
import qualified Cardano.Wallet.Primitive.Types.TokenMap as W.TokenMap
300+
import qualified Cardano.Wallet.Primitive.Types.TokenBundle as W.TokenBundle
302301
import qualified Cardano.Wallet.Primitive.Types.TokenMap as W
303302
( AssetId
304303
)
304+
import qualified Cardano.Wallet.Primitive.Types.TokenMap as W.TokenMap
305305
import qualified Cardano.Wallet.Primitive.Types.TokenQuantity as W
306306
( TokenQuantity
307307
)
308308
import qualified Cardano.Wallet.Primitive.Types.Tx.TxIn as W
309309
( TxIn
310310
)
311-
import qualified Cardano.Wallet.Primitive.Types.Tx.TxOut as W.TxOut
312311
import qualified Cardano.Wallet.Primitive.Types.Tx.TxOut as W
313312
( TxOut (..)
314313
)
315-
import qualified Cardano.Wallet.Primitive.Types.UTxO as W.UTxO
314+
import qualified Cardano.Wallet.Primitive.Types.Tx.TxOut as W.TxOut
316315
import qualified Cardano.Wallet.Primitive.Types.UTxO as W
317316
( UTxO (..)
318317
)
318+
import qualified Cardano.Wallet.Primitive.Types.UTxO as W.UTxO
319319
import qualified Cardano.Wallet.Shelley.Compatibility.Ledger as Convert
320320
import qualified Data.Foldable as F
321321
import qualified Data.List as L

‎lib/coin-selection/lib/Cardano/CoinSelection/UTxOIndex/Internal.hs

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -145,14 +145,14 @@ import GHC.Generics
145145
( Generic
146146
)
147147

148-
import qualified Cardano.Wallet.Primitive.Types.TokenBundle as W.TokenBundle
149148
import qualified Cardano.Wallet.Primitive.Types.TokenBundle as W
150149
( TokenBundle
151150
)
152-
import qualified Cardano.Wallet.Primitive.Types.TokenMap as W.TokenMap
151+
import qualified Cardano.Wallet.Primitive.Types.TokenBundle as W.TokenBundle
153152
import qualified Cardano.Wallet.Primitive.Types.TokenMap as W
154153
( AssetId
155154
)
155+
import qualified Cardano.Wallet.Primitive.Types.TokenMap as W.TokenMap
156156
import qualified Data.Foldable as F
157157
import qualified Data.List as L
158158
import qualified Data.List.NonEmpty as NE

‎lib/delta-table/src/Database/Persist/Delta.hs

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -60,10 +60,10 @@ import Database.Persist.Sql
6060
, toSqlKey
6161
)
6262
import Database.Schema
63-
( (:.) (..)
64-
, Col (..)
63+
( Col (..)
6564
, IsRow
6665
, Primary (..)
66+
, (:.) (..)
6767
)
6868
import Say
6969
( say

‎lib/delta-table/src/Demo/Database.hs

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -93,10 +93,10 @@ import Database.Persist.TH
9393
, sqlSettings
9494
)
9595
import Database.Schema
96-
( (:.) (..)
97-
, Col (..)
96+
( Col (..)
9897
, Primary
9998
, Table (..)
99+
, (:.) (..)
100100
)
101101
import GHC.Generics
102102
( Generic

‎lib/primitive/lib/Cardano/Wallet/Primitive/Types/Tx/SealedTx.hs

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -83,8 +83,8 @@ import Data.Text
8383
( Text
8484
)
8585
import Data.Type.Equality
86-
( (:~:) (..)
87-
, testEquality
86+
( testEquality
87+
, (:~:) (..)
8888
)
8989
import Fmt
9090
( Buildable (..)

‎lib/read/lib/Cardano/Wallet/Read/Eras.hs

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -75,9 +75,9 @@ import Cardano.Wallet.Read.Eras.KnownEras
7575
, knownEraIndices
7676
)
7777
import Generics.SOP
78-
( (:.:) (..)
79-
, K (..)
78+
( K (..)
8079
, unK
80+
, (:.:) (..)
8181
)
8282
import GHC.Generics
8383
( (:*:) (..)

‎lib/read/lib/Cardano/Wallet/Read/Eras/EraFun.hs

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -63,15 +63,15 @@ import Control.Category
6363
( Category (..)
6464
)
6565
import Generics.SOP
66-
( (:.:) (..)
67-
, I (..)
66+
( I (..)
6867
, K (..)
6968
, NP
7069
, Proxy (Proxy)
7170
, productTypeFrom
7271
, productTypeTo
7372
, unComp
7473
, unK
74+
, (:.:) (..)
7575
)
7676
import Generics.SOP.Classes
7777
import Generics.SOP.NP

‎lib/read/lib/Cardano/Wallet/Read/Eras/EraValue.hs

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -75,8 +75,7 @@ import Data.Generics.Internal.VL
7575
, prism
7676
)
7777
import Generics.SOP
78-
( (:.:)
79-
, All
78+
( All
8079
, Compose
8180
, K (..)
8281
, NP (..)
@@ -86,6 +85,7 @@ import Generics.SOP
8685
, injections
8786
, unComp
8887
, unK
88+
, (:.:)
8989
)
9090
import Generics.SOP.Classes
9191
import Generics.SOP.NP

‎lib/read/lib/Cardano/Wallet/Read/Tx/CBOR.hs

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -41,13 +41,13 @@ import Cardano.Ledger.Binary.Decoding
4141
, shelleyProtVer
4242
)
4343
import Cardano.Wallet.Read.Eras
44-
( (:.:) (..)
45-
, EraFun (..)
44+
( EraFun (..)
4645
, EraValue
4746
, K (..)
4847
, applyEraFun
4948
, extractEraValue
5049
, sequenceEraValue
50+
, (:.:) (..)
5151
)
5252
import Cardano.Wallet.Read.Tx
5353
( Tx (..)

‎lib/test-utils/src/Test/QuickCheck/Extra.hs

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -116,10 +116,10 @@ import Fmt
116116
)
117117
import Generics.SOP
118118
import GHC.TypeNats
119-
( type (<=)
120-
, KnownNat
119+
( KnownNat
121120
, Nat
122121
, natVal
122+
, type (<=)
123123
)
124124
import Numeric.Natural
125125
( Natural

‎lib/wai-middleware-logging/test/Network/Wai/Middleware/LoggingSpec.hs

Lines changed: 3 additions & 3 deletions
Original file line numberDiff line numberDiff line change
@@ -98,9 +98,7 @@ import Network.Wai.Middleware.Logging
9898
, withApiLogger
9999
)
100100
import Servant
101-
( (:<|>) (..)
102-
, (:>)
103-
, Application
101+
( Application
104102
, DeleteNoContent
105103
, Get
106104
, JSON
@@ -114,6 +112,8 @@ import Servant
114112
, err503
115113
, serve
116114
, throwError
115+
, (:<|>) (..)
116+
, (:>)
117117
)
118118
import Servant.Server
119119
( Handler

‎lib/wallet-e2e/src/Cardano/Wallet/Spec/Effect/Assert.hs

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -16,9 +16,9 @@ import Cardano.Wallet.Spec.Effect.Trace
1616
, trace
1717
)
1818
import Effectful
19-
( (:>)
20-
, Eff
19+
( Eff
2120
, Effect
21+
, (:>)
2222
)
2323
import Effectful.Dispatch.Dynamic
2424
( interpret

‎lib/wallet-e2e/src/Cardano/Wallet/Spec/Effect/Http.hs

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -14,10 +14,10 @@ import Control.Exception
1414
( try
1515
)
1616
import Effectful
17-
( (:>)
18-
, Eff
17+
( Eff
1918
, Effect
2019
, IOE
20+
, (:>)
2121
)
2222
import Effectful.Dispatch.Dynamic
2323
( interpret

‎lib/wallet-e2e/src/Cardano/Wallet/Spec/Effect/Query.hs

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -57,9 +57,9 @@ import Cardano.Wallet.Spec.Network.Config
5757
( NetworkConfig (..)
5858
)
5959
import Effectful
60-
( (:>)
61-
, Eff
60+
( Eff
6261
, Effect
62+
, (:>)
6363
)
6464
import Effectful.Dispatch.Dynamic
6565
( interpret

‎lib/wallet-e2e/src/Cardano/Wallet/Spec/Effect/Random.hs

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -28,9 +28,9 @@ import Data.Tagged
2828
( Tagged (..)
2929
)
3030
import Effectful
31-
( (:>)
32-
, Eff
31+
( Eff
3332
, Effect
33+
, (:>)
3434
)
3535
import Effectful.Dispatch.Dynamic
3636
( interpret

‎lib/wallet-e2e/src/Cardano/Wallet/Spec/Effect/Timeout.hs

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -21,10 +21,10 @@ import Data.Time.TimeSpan
2121
, timeoutTS
2222
)
2323
import Effectful
24-
( (:>)
25-
, Eff
24+
( Eff
2625
, Effect
2726
, IOE
27+
, (:>)
2828
)
2929
import Effectful.Dispatch.Dynamic
3030
( interpret

‎lib/wallet-e2e/src/Cardano/Wallet/Spec/Stories/Language.hs

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -1,8 +1,8 @@
11
module Cardano.Wallet.Spec.Stories.Language (FxStory) where
22

33
import Effectful
4-
( (:>)
5-
, Eff
4+
( Eff
5+
, (:>)
66
)
77

88
type FxStory otherEffects knownEffects a =

‎lib/wallet/api/http/Cardano/Wallet/Api.hs

Lines changed: 3 additions & 3 deletions
Original file line numberDiff line numberDiff line change
@@ -327,14 +327,14 @@ import GHC.Generics
327327
( Generic
328328
)
329329
import Servant.API
330-
( (:<|>)
331-
, (:>)
332-
, Capture
330+
( Capture
333331
, JSON
334332
, OctetStream
335333
, QueryFlag
336334
, QueryParam
337335
, ReqBody
336+
, (:<|>)
337+
, (:>)
338338
)
339339
import Servant.API.Verbs
340340
( DeleteAccepted

‎lib/wallet/api/http/Cardano/Wallet/Api/Client.hs

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -135,9 +135,9 @@ import Data.Text
135135
( Text
136136
)
137137
import Servant
138-
( (:<|>) (..)
138+
( NoContent
139+
, (:<|>) (..)
139140
, (:>)
140-
, NoContent
141141
)
142142
import Servant.Client
143143
( ClientM

‎lib/wallet/api/http/Cardano/Wallet/Api/Http/Server.hs

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -264,11 +264,11 @@ import Network.Ntp
264264
( NtpClient
265265
)
266266
import Servant
267-
( (:<|>) (..)
268-
, Handler (..)
267+
( Handler (..)
269268
, NoContent (..)
270269
, Server
271270
, err400
271+
, (:<|>) (..)
272272
)
273273
import Servant.Server
274274
( ServerError (..)

‎lib/wallet/api/http/Cardano/Wallet/Api/Http/Server/Handlers/TxCBOR.hs

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -37,14 +37,14 @@ import Cardano.Wallet.Read
3737
( Tx (..)
3838
)
3939
import Cardano.Wallet.Read.Eras
40-
( (:.:)
41-
, EraFun (..)
40+
( EraFun (..)
4241
, K (..)
4342
, applyEraFun
4443
, extractEraValue
4544
, sequenceEraValue
4645
, (*&&&*)
4746
, (*.**)
47+
, (:.:)
4848
)
4949
import Cardano.Wallet.Read.Eras.EraFun
5050
( EraFunK (..)

‎lib/wallet/api/http/Cardano/Wallet/Api/Link.hs

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -200,8 +200,7 @@ import Numeric.Natural
200200
( Natural
201201
)
202202
import Servant.API
203-
( (:>)
204-
, Capture'
203+
( Capture'
205204
, Header'
206205
, IsElem
207206
, NoContentVerb
@@ -210,6 +209,7 @@ import Servant.API
210209
, ReflectMethod (..)
211210
, ReqBody
212211
, Verb
212+
, (:>)
213213
)
214214
import Servant.Links
215215
( HasLink (..)

‎lib/wallet/mock-token-metadata/src/Cardano/Wallet/TokenMetadata/MockServer.hs

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -106,10 +106,10 @@ import Network.Wai.Handler.Warp
106106
, withApplication
107107
)
108108
import Servant.API
109-
( (:>)
110-
, JSON
109+
( JSON
111110
, Post
112111
, ReqBody
112+
, (:>)
113113
)
114114
import Servant.Server
115115
( Handler (..)

0 commit comments

Comments
 (0)