diff --git a/lib/address-derivation-discovery/lib/Cardano/Wallet/Address/Derivation.hs b/lib/address-derivation-discovery/lib/Cardano/Wallet/Address/Derivation.hs index 6bbc0dd2059..a6b605b443a 100644 --- a/lib/address-derivation-discovery/lib/Cardano/Wallet/Address/Derivation.hs +++ b/lib/address-derivation-discovery/lib/Cardano/Wallet/Address/Derivation.hs @@ -157,8 +157,8 @@ import Data.Text.Class , toTextFromBoundedEnum ) import Data.Type.Equality - ( (:~:) (..) - , testEquality + ( testEquality + , (:~:) (..) ) import Data.Word ( Word32 diff --git a/lib/balance-tx/lib/internal/Internal/Cardano/Write/Tx.hs b/lib/balance-tx/lib/internal/Internal/Cardano/Write/Tx.hs index 5bcfe1a16ab..5d207cbc8ba 100644 --- a/lib/balance-tx/lib/internal/Internal/Cardano/Write/Tx.hs +++ b/lib/balance-tx/lib/internal/Internal/Cardano/Write/Tx.hs @@ -238,8 +238,8 @@ import Data.Maybe , isJust ) import Data.Type.Equality - ( (:~:) (Refl) - , TestEquality (testEquality) + ( TestEquality (testEquality) + , (:~:) (Refl) ) import Data.Typeable ( Typeable diff --git a/lib/balance-tx/lib/internal/Internal/Cardano/Write/Tx/Balance.hs b/lib/balance-tx/lib/internal/Internal/Cardano/Write/Tx/Balance.hs index 6ca8b53bdc8..f8c97c21745 100644 --- a/lib/balance-tx/lib/internal/Internal/Cardano/Write/Tx/Balance.hs +++ b/lib/balance-tx/lib/internal/Internal/Cardano/Write/Tx/Balance.hs @@ -176,8 +176,8 @@ import Data.Semigroup.Cancellative ( Reductive (()) ) import Data.Type.Equality - ( (:~:) (..) - , testEquality + ( testEquality + , (:~:) (..) ) import Fmt ( Buildable @@ -289,32 +289,32 @@ import qualified Cardano.Ledger.Core as Core import qualified Cardano.Wallet.Primitive.Types.Address as W ( Address ) -import qualified Cardano.Wallet.Primitive.Types.Coin as W.Coin import qualified Cardano.Wallet.Primitive.Types.Coin as W ( Coin (..) ) -import qualified Cardano.Wallet.Primitive.Types.TokenBundle as W.TokenBundle +import qualified Cardano.Wallet.Primitive.Types.Coin as W.Coin import qualified Cardano.Wallet.Primitive.Types.TokenBundle as W ( TokenBundle (..) ) -import qualified Cardano.Wallet.Primitive.Types.TokenMap as W.TokenMap +import qualified Cardano.Wallet.Primitive.Types.TokenBundle as W.TokenBundle import qualified Cardano.Wallet.Primitive.Types.TokenMap as W ( AssetId ) +import qualified Cardano.Wallet.Primitive.Types.TokenMap as W.TokenMap import qualified Cardano.Wallet.Primitive.Types.TokenQuantity as W ( TokenQuantity ) import qualified Cardano.Wallet.Primitive.Types.Tx.TxIn as W ( TxIn ) -import qualified Cardano.Wallet.Primitive.Types.Tx.TxOut as W.TxOut import qualified Cardano.Wallet.Primitive.Types.Tx.TxOut as W ( TxOut (..) ) -import qualified Cardano.Wallet.Primitive.Types.UTxO as W.UTxO +import qualified Cardano.Wallet.Primitive.Types.Tx.TxOut as W.TxOut import qualified Cardano.Wallet.Primitive.Types.UTxO as W ( UTxO (..) ) +import qualified Cardano.Wallet.Primitive.Types.UTxO as W.UTxO import qualified Cardano.Wallet.Shelley.Compatibility.Ledger as Convert import qualified Data.Foldable as F import qualified Data.List as L diff --git a/lib/coin-selection/lib/Cardano/CoinSelection/UTxOIndex/Internal.hs b/lib/coin-selection/lib/Cardano/CoinSelection/UTxOIndex/Internal.hs index fe0c09fffcc..eadfb10d4c2 100644 --- a/lib/coin-selection/lib/Cardano/CoinSelection/UTxOIndex/Internal.hs +++ b/lib/coin-selection/lib/Cardano/CoinSelection/UTxOIndex/Internal.hs @@ -145,14 +145,14 @@ import GHC.Generics ( Generic ) -import qualified Cardano.Wallet.Primitive.Types.TokenBundle as W.TokenBundle import qualified Cardano.Wallet.Primitive.Types.TokenBundle as W ( TokenBundle ) -import qualified Cardano.Wallet.Primitive.Types.TokenMap as W.TokenMap +import qualified Cardano.Wallet.Primitive.Types.TokenBundle as W.TokenBundle import qualified Cardano.Wallet.Primitive.Types.TokenMap as W ( AssetId ) +import qualified Cardano.Wallet.Primitive.Types.TokenMap as W.TokenMap import qualified Data.Foldable as F import qualified Data.List as L import qualified Data.List.NonEmpty as NE diff --git a/lib/delta-table/src/Database/Persist/Delta.hs b/lib/delta-table/src/Database/Persist/Delta.hs index fea6b5e62bb..f3f5ea64a15 100644 --- a/lib/delta-table/src/Database/Persist/Delta.hs +++ b/lib/delta-table/src/Database/Persist/Delta.hs @@ -60,10 +60,10 @@ import Database.Persist.Sql , toSqlKey ) import Database.Schema - ( (:.) (..) - , Col (..) + ( Col (..) , IsRow , Primary (..) + , (:.) (..) ) import Say ( say diff --git a/lib/delta-table/src/Demo/Database.hs b/lib/delta-table/src/Demo/Database.hs index cba51341970..8b46ca5c5ef 100644 --- a/lib/delta-table/src/Demo/Database.hs +++ b/lib/delta-table/src/Demo/Database.hs @@ -93,10 +93,10 @@ import Database.Persist.TH , sqlSettings ) import Database.Schema - ( (:.) (..) - , Col (..) + ( Col (..) , Primary , Table (..) + , (:.) (..) ) import GHC.Generics ( Generic diff --git a/lib/primitive/lib/Cardano/Wallet/Primitive/Types/Tx/SealedTx.hs b/lib/primitive/lib/Cardano/Wallet/Primitive/Types/Tx/SealedTx.hs index 475c644e6fc..f785020b249 100644 --- a/lib/primitive/lib/Cardano/Wallet/Primitive/Types/Tx/SealedTx.hs +++ b/lib/primitive/lib/Cardano/Wallet/Primitive/Types/Tx/SealedTx.hs @@ -83,8 +83,8 @@ import Data.Text ( Text ) import Data.Type.Equality - ( (:~:) (..) - , testEquality + ( testEquality + , (:~:) (..) ) import Fmt ( Buildable (..) diff --git a/lib/read/lib/Cardano/Wallet/Read/Eras.hs b/lib/read/lib/Cardano/Wallet/Read/Eras.hs index 43c8dab492b..21cf3b6d37b 100644 --- a/lib/read/lib/Cardano/Wallet/Read/Eras.hs +++ b/lib/read/lib/Cardano/Wallet/Read/Eras.hs @@ -75,9 +75,9 @@ import Cardano.Wallet.Read.Eras.KnownEras , knownEraIndices ) import Generics.SOP - ( (:.:) (..) - , K (..) + ( K (..) , unK + , (:.:) (..) ) import GHC.Generics ( (:*:) (..) diff --git a/lib/read/lib/Cardano/Wallet/Read/Eras/EraFun.hs b/lib/read/lib/Cardano/Wallet/Read/Eras/EraFun.hs index d7fd50330d0..9204574c6d5 100644 --- a/lib/read/lib/Cardano/Wallet/Read/Eras/EraFun.hs +++ b/lib/read/lib/Cardano/Wallet/Read/Eras/EraFun.hs @@ -63,8 +63,7 @@ import Control.Category ( Category (..) ) import Generics.SOP - ( (:.:) (..) - , I (..) + ( I (..) , K (..) , NP , Proxy (Proxy) @@ -72,6 +71,7 @@ import Generics.SOP , productTypeTo , unComp , unK + , (:.:) (..) ) import Generics.SOP.Classes import Generics.SOP.NP diff --git a/lib/read/lib/Cardano/Wallet/Read/Eras/EraValue.hs b/lib/read/lib/Cardano/Wallet/Read/Eras/EraValue.hs index 3fb0f4ef56e..90e314b75d1 100644 --- a/lib/read/lib/Cardano/Wallet/Read/Eras/EraValue.hs +++ b/lib/read/lib/Cardano/Wallet/Read/Eras/EraValue.hs @@ -75,8 +75,7 @@ import Data.Generics.Internal.VL , prism ) import Generics.SOP - ( (:.:) - , All + ( All , Compose , K (..) , NP (..) @@ -86,6 +85,7 @@ import Generics.SOP , injections , unComp , unK + , (:.:) ) import Generics.SOP.Classes import Generics.SOP.NP diff --git a/lib/read/lib/Cardano/Wallet/Read/Tx/CBOR.hs b/lib/read/lib/Cardano/Wallet/Read/Tx/CBOR.hs index 730eee42f7d..c2b77577f96 100644 --- a/lib/read/lib/Cardano/Wallet/Read/Tx/CBOR.hs +++ b/lib/read/lib/Cardano/Wallet/Read/Tx/CBOR.hs @@ -41,13 +41,13 @@ import Cardano.Ledger.Binary.Decoding , shelleyProtVer ) import Cardano.Wallet.Read.Eras - ( (:.:) (..) - , EraFun (..) + ( EraFun (..) , EraValue , K (..) , applyEraFun , extractEraValue , sequenceEraValue + , (:.:) (..) ) import Cardano.Wallet.Read.Tx ( Tx (..) diff --git a/lib/test-utils/src/Test/QuickCheck/Extra.hs b/lib/test-utils/src/Test/QuickCheck/Extra.hs index 021dd9f995a..524568c5729 100644 --- a/lib/test-utils/src/Test/QuickCheck/Extra.hs +++ b/lib/test-utils/src/Test/QuickCheck/Extra.hs @@ -116,10 +116,10 @@ import Fmt ) import Generics.SOP import GHC.TypeNats - ( type (<=) - , KnownNat + ( KnownNat , Nat , natVal + , type (<=) ) import Numeric.Natural ( Natural diff --git a/lib/wai-middleware-logging/test/Network/Wai/Middleware/LoggingSpec.hs b/lib/wai-middleware-logging/test/Network/Wai/Middleware/LoggingSpec.hs index 076cf1f6339..9b38d37471a 100644 --- a/lib/wai-middleware-logging/test/Network/Wai/Middleware/LoggingSpec.hs +++ b/lib/wai-middleware-logging/test/Network/Wai/Middleware/LoggingSpec.hs @@ -98,9 +98,7 @@ import Network.Wai.Middleware.Logging , withApiLogger ) import Servant - ( (:<|>) (..) - , (:>) - , Application + ( Application , DeleteNoContent , Get , JSON @@ -114,6 +112,8 @@ import Servant , err503 , serve , throwError + , (:<|>) (..) + , (:>) ) import Servant.Server ( Handler diff --git a/lib/wallet-e2e/src/Cardano/Wallet/Spec/Effect/Assert.hs b/lib/wallet-e2e/src/Cardano/Wallet/Spec/Effect/Assert.hs index 4686ed7c7a2..d4d8ad75060 100644 --- a/lib/wallet-e2e/src/Cardano/Wallet/Spec/Effect/Assert.hs +++ b/lib/wallet-e2e/src/Cardano/Wallet/Spec/Effect/Assert.hs @@ -16,9 +16,9 @@ import Cardano.Wallet.Spec.Effect.Trace , trace ) import Effectful - ( (:>) - , Eff + ( Eff , Effect + , (:>) ) import Effectful.Dispatch.Dynamic ( interpret diff --git a/lib/wallet-e2e/src/Cardano/Wallet/Spec/Effect/Http.hs b/lib/wallet-e2e/src/Cardano/Wallet/Spec/Effect/Http.hs index fb8c30ca445..4c20b662691 100644 --- a/lib/wallet-e2e/src/Cardano/Wallet/Spec/Effect/Http.hs +++ b/lib/wallet-e2e/src/Cardano/Wallet/Spec/Effect/Http.hs @@ -14,10 +14,10 @@ import Control.Exception ( try ) import Effectful - ( (:>) - , Eff + ( Eff , Effect , IOE + , (:>) ) import Effectful.Dispatch.Dynamic ( interpret diff --git a/lib/wallet-e2e/src/Cardano/Wallet/Spec/Effect/Query.hs b/lib/wallet-e2e/src/Cardano/Wallet/Spec/Effect/Query.hs index cde54b70e4c..6c404d8ce27 100644 --- a/lib/wallet-e2e/src/Cardano/Wallet/Spec/Effect/Query.hs +++ b/lib/wallet-e2e/src/Cardano/Wallet/Spec/Effect/Query.hs @@ -57,9 +57,9 @@ import Cardano.Wallet.Spec.Network.Configured ( ConfiguredNetwork (..) ) import Effectful - ( (:>) - , Eff + ( Eff , Effect + , (:>) ) import Effectful.Dispatch.Dynamic ( interpret diff --git a/lib/wallet-e2e/src/Cardano/Wallet/Spec/Effect/Random.hs b/lib/wallet-e2e/src/Cardano/Wallet/Spec/Effect/Random.hs index 9cb565a08b2..e5a3dfd280a 100644 --- a/lib/wallet-e2e/src/Cardano/Wallet/Spec/Effect/Random.hs +++ b/lib/wallet-e2e/src/Cardano/Wallet/Spec/Effect/Random.hs @@ -28,9 +28,9 @@ import Data.Tagged ( Tagged (..) ) import Effectful - ( (:>) - , Eff + ( Eff , Effect + , (:>) ) import Effectful.Dispatch.Dynamic ( interpret diff --git a/lib/wallet-e2e/src/Cardano/Wallet/Spec/Effect/Timeout.hs b/lib/wallet-e2e/src/Cardano/Wallet/Spec/Effect/Timeout.hs index 944097f868a..fe5c1954e2d 100644 --- a/lib/wallet-e2e/src/Cardano/Wallet/Spec/Effect/Timeout.hs +++ b/lib/wallet-e2e/src/Cardano/Wallet/Spec/Effect/Timeout.hs @@ -21,10 +21,10 @@ import Data.Time.TimeSpan , timeoutTS ) import Effectful - ( (:>) - , Eff + ( Eff , Effect , IOE + , (:>) ) import Effectful.Dispatch.Dynamic ( interpret diff --git a/lib/wallet-e2e/src/Cardano/Wallet/Spec/Stories/Language.hs b/lib/wallet-e2e/src/Cardano/Wallet/Spec/Stories/Language.hs index 0d63b5dc107..d62d0c4b4dd 100644 --- a/lib/wallet-e2e/src/Cardano/Wallet/Spec/Stories/Language.hs +++ b/lib/wallet-e2e/src/Cardano/Wallet/Spec/Stories/Language.hs @@ -1,8 +1,8 @@ module Cardano.Wallet.Spec.Stories.Language (FxStory) where import Effectful - ( (:>) - , Eff + ( Eff + , (:>) ) type FxStory otherEffects knownEffects a = diff --git a/lib/wallet/api/http/Cardano/Wallet/Api.hs b/lib/wallet/api/http/Cardano/Wallet/Api.hs index 943a31edfb0..10913699f76 100644 --- a/lib/wallet/api/http/Cardano/Wallet/Api.hs +++ b/lib/wallet/api/http/Cardano/Wallet/Api.hs @@ -327,14 +327,14 @@ import GHC.Generics ( Generic ) import Servant.API - ( (:<|>) - , (:>) - , Capture + ( Capture , JSON , OctetStream , QueryFlag , QueryParam , ReqBody + , (:<|>) + , (:>) ) import Servant.API.Verbs ( DeleteAccepted diff --git a/lib/wallet/api/http/Cardano/Wallet/Api/Client.hs b/lib/wallet/api/http/Cardano/Wallet/Api/Client.hs index 5bd2f14f026..f4b5768c794 100644 --- a/lib/wallet/api/http/Cardano/Wallet/Api/Client.hs +++ b/lib/wallet/api/http/Cardano/Wallet/Api/Client.hs @@ -135,9 +135,9 @@ import Data.Text ( Text ) import Servant - ( (:<|>) (..) + ( NoContent + , (:<|>) (..) , (:>) - , NoContent ) import Servant.Client ( ClientM diff --git a/lib/wallet/api/http/Cardano/Wallet/Api/Http/Server.hs b/lib/wallet/api/http/Cardano/Wallet/Api/Http/Server.hs index 19cee07d03f..6d9756e829a 100644 --- a/lib/wallet/api/http/Cardano/Wallet/Api/Http/Server.hs +++ b/lib/wallet/api/http/Cardano/Wallet/Api/Http/Server.hs @@ -264,11 +264,11 @@ import Network.Ntp ( NtpClient ) import Servant - ( (:<|>) (..) - , Handler (..) + ( Handler (..) , NoContent (..) , Server , err400 + , (:<|>) (..) ) import Servant.Server ( ServerError (..) diff --git a/lib/wallet/api/http/Cardano/Wallet/Api/Http/Server/Handlers/TxCBOR.hs b/lib/wallet/api/http/Cardano/Wallet/Api/Http/Server/Handlers/TxCBOR.hs index d1da7a9b044..68e5ea24a4e 100644 --- a/lib/wallet/api/http/Cardano/Wallet/Api/Http/Server/Handlers/TxCBOR.hs +++ b/lib/wallet/api/http/Cardano/Wallet/Api/Http/Server/Handlers/TxCBOR.hs @@ -37,14 +37,14 @@ import Cardano.Wallet.Read ( Tx (..) ) import Cardano.Wallet.Read.Eras - ( (:.:) - , EraFun (..) + ( EraFun (..) , K (..) , applyEraFun , extractEraValue , sequenceEraValue , (*&&&*) , (*.**) + , (:.:) ) import Cardano.Wallet.Read.Eras.EraFun ( EraFunK (..) diff --git a/lib/wallet/api/http/Cardano/Wallet/Api/Link.hs b/lib/wallet/api/http/Cardano/Wallet/Api/Link.hs index a35f33c888b..2753b8bf271 100644 --- a/lib/wallet/api/http/Cardano/Wallet/Api/Link.hs +++ b/lib/wallet/api/http/Cardano/Wallet/Api/Link.hs @@ -200,8 +200,7 @@ import Numeric.Natural ( Natural ) import Servant.API - ( (:>) - , Capture' + ( Capture' , Header' , IsElem , NoContentVerb @@ -210,6 +209,7 @@ import Servant.API , ReflectMethod (..) , ReqBody , Verb + , (:>) ) import Servant.Links ( HasLink (..) diff --git a/lib/wallet/mock-token-metadata/src/Cardano/Wallet/TokenMetadata/MockServer.hs b/lib/wallet/mock-token-metadata/src/Cardano/Wallet/TokenMetadata/MockServer.hs index 7260e304dcb..f7da099014b 100644 --- a/lib/wallet/mock-token-metadata/src/Cardano/Wallet/TokenMetadata/MockServer.hs +++ b/lib/wallet/mock-token-metadata/src/Cardano/Wallet/TokenMetadata/MockServer.hs @@ -106,10 +106,10 @@ import Network.Wai.Handler.Warp , withApplication ) import Servant.API - ( (:>) - , JSON + ( JSON , Post , ReqBody + , (:>) ) import Servant.Server ( Handler (..) diff --git a/lib/wallet/src/Cardano/Wallet.hs b/lib/wallet/src/Cardano/Wallet.hs index 61454382cdd..de6742f00df 100644 --- a/lib/wallet/src/Cardano/Wallet.hs +++ b/lib/wallet/src/Cardano/Wallet.hs @@ -559,9 +559,9 @@ import Cardano.Wallet.Shelley.Compatibility.Ledger , toWalletCoin ) import Cardano.Wallet.Shelley.Transaction - ( txConstraints + ( _txRewardWithdrawalCost + , txConstraints , txWitnessTagForKey - , _txRewardWithdrawalCost ) import Cardano.Wallet.Transaction ( DelegationAction (..) diff --git a/lib/wallet/src/Cardano/Wallet/Compat.hs b/lib/wallet/src/Cardano/Wallet/Compat.hs index 7ecf8fddf2c..a4a7a59499e 100644 --- a/lib/wallet/src/Cardano/Wallet/Compat.hs +++ b/lib/wallet/src/Cardano/Wallet/Compat.hs @@ -17,7 +17,7 @@ import Data.Monoid ( First (..) ) import Data.Profunctor.Unsafe - ( ( #. ) + ( (#.) ) infixl 8 ^? diff --git a/lib/wallet/src/Cardano/Wallet/DB/Migration.hs b/lib/wallet/src/Cardano/Wallet/DB/Migration.hs index b744823958c..ab0ca45de1d 100644 --- a/lib/wallet/src/Cardano/Wallet/DB/Migration.hs +++ b/lib/wallet/src/Cardano/Wallet/DB/Migration.hs @@ -58,10 +58,10 @@ import GHC.Natural ( Natural ) import GHC.TypeNats - ( type (+) - , KnownNat + ( KnownNat , Nat , natVal + , type (+) ) -------------------------------------------------------------------------------- diff --git a/lib/wallet/src/Cardano/Wallet/DB/Store/Submissions/Layer.hs b/lib/wallet/src/Cardano/Wallet/DB/Store/Submissions/Layer.hs index f057feb1e6d..0dbe6d5c59d 100644 --- a/lib/wallet/src/Cardano/Wallet/DB/Store/Submissions/Layer.hs +++ b/lib/wallet/src/Cardano/Wallet/DB/Store/Submissions/Layer.hs @@ -68,10 +68,10 @@ import Cardano.Wallet.Submissions.Submissions ) import Cardano.Wallet.Submissions.TxStatus ( TxStatus (..) + , _InSubmission , expirySlot , getTx , status - , _InSubmission ) import Cardano.Wallet.Transaction.Built ( BuiltTx (..) diff --git a/lib/wallet/src/Cardano/Wallet/Primitive/Types/StateDeltaSeq.hs b/lib/wallet/src/Cardano/Wallet/Primitive/Types/StateDeltaSeq.hs index 399c79f2336..b508e7af335 100644 --- a/lib/wallet/src/Cardano/Wallet/Primitive/Types/StateDeltaSeq.hs +++ b/lib/wallet/src/Cardano/Wallet/Primitive/Types/StateDeltaSeq.hs @@ -134,7 +134,7 @@ import Data.List.NonEmpty ( NonEmpty (..) ) import Data.Sequence - ( Seq ((:<|), (:|>), Empty) + ( Seq (Empty, (:<|), (:|>)) ) import qualified Data.Foldable as F diff --git a/lib/wallet/src/Cardano/Wallet/Read/Primitive/Tx/Features/Mint.hs b/lib/wallet/src/Cardano/Wallet/Read/Primitive/Tx/Features/Mint.hs index 622524ce939..23d439f5acd 100644 --- a/lib/wallet/src/Cardano/Wallet/Read/Primitive/Tx/Features/Mint.hs +++ b/lib/wallet/src/Cardano/Wallet/Read/Primitive/Tx/Features/Mint.hs @@ -53,9 +53,9 @@ import Cardano.Wallet.Primitive.Types.TokenPolicy ( TokenPolicyId (..) ) import Cardano.Wallet.Read.Eras - ( (:*:) (..) - , EraFun (..) + ( EraFun (..) , K (..) + , (:*:) (..) ) import Cardano.Wallet.Read.Primitive.Tx.Features.Inputs ( fromShelleyTxIn diff --git a/lib/wallet/src/Cardano/Wallet/Shelley/Compatibility.hs b/lib/wallet/src/Cardano/Wallet/Shelley/Compatibility.hs index 303666adb3b..256085f8f73 100644 --- a/lib/wallet/src/Cardano/Wallet/Shelley/Compatibility.hs +++ b/lib/wallet/src/Cardano/Wallet/Shelley/Compatibility.hs @@ -346,8 +346,8 @@ import Data.Quantity , mkPercentage ) import Data.Type.Equality - ( (:~:) (..) - , testEquality + ( testEquality + , (:~:) (..) ) import Data.Word ( Word16 diff --git a/lib/wallet/test/unit/Cardano/Wallet/Api/TypesSpec.hs b/lib/wallet/test/unit/Cardano/Wallet/Api/TypesSpec.hs index 2d6ada50409..9106a9074c5 100644 --- a/lib/wallet/test/unit/Cardano/Wallet/Api/TypesSpec.hs +++ b/lib/wallet/test/unit/Cardano/Wallet/Api/TypesSpec.hs @@ -559,9 +559,7 @@ import Numeric.Natural ( Natural ) import Servant - ( (:<|>) - , (:>) - , Capture + ( Capture , Header' , JSON , PostNoContent @@ -570,6 +568,8 @@ import Servant , ReqBody , StdMethod (..) , Verb + , (:<|>) + , (:>) ) import Servant.API.Verbs ( NoContentVerb diff --git a/lib/wallet/test/unit/Cardano/Wallet/ApiSpec.hs b/lib/wallet/test/unit/Cardano/Wallet/ApiSpec.hs index 292afb17fc4..69b83e0b0e0 100644 --- a/lib/wallet/test/unit/Cardano/Wallet/ApiSpec.hs +++ b/lib/wallet/test/unit/Cardano/Wallet/ApiSpec.hs @@ -93,8 +93,8 @@ import Data.Tuple ( swap ) import Data.Type.Equality - ( (:~:) (..) - , testEquality + ( testEquality + , (:~:) (..) ) import Data.Typeable ( Typeable @@ -151,10 +151,10 @@ import Servant , serve ) import Servant.API - ( (:<|>) (..) - , (:>) - , Capture + ( Capture , OctetStream + , (:<|>) (..) + , (:>) ) import Servant.API.Verbs ( NoContentVerb diff --git a/lib/wallet/test/unit/Cardano/Wallet/Submissions/Gen.hs b/lib/wallet/test/unit/Cardano/Wallet/Submissions/Gen.hs index a7296cafa5c..b421c824fc7 100644 --- a/lib/wallet/test/unit/Cardano/Wallet/Submissions/Gen.hs +++ b/lib/wallet/test/unit/Cardano/Wallet/Submissions/Gen.hs @@ -29,20 +29,20 @@ import Cardano.Wallet.Submissions.Submissions ) import Cardano.Wallet.Submissions.TxStatus ( HasTxId (..) - , getTx , _Expired , _InLedger , _InSubmission + , getTx ) import Control.Arrow ( (&&&) ) import Control.Lens - ( lastOf + ( _2 + , lastOf , to , view , (&) - , _2 ) import Control.Lens.Extras ( is diff --git a/lib/wallet/test/unit/Internal/Cardano/Write/Tx/BalanceSpec.hs b/lib/wallet/test/unit/Internal/Cardano/Write/Tx/BalanceSpec.hs index e15b723a5e6..6cec74f5f87 100644 --- a/lib/wallet/test/unit/Internal/Cardano/Write/Tx/BalanceSpec.hs +++ b/lib/wallet/test/unit/Internal/Cardano/Write/Tx/BalanceSpec.hs @@ -147,9 +147,9 @@ import Cardano.Wallet.Primitive.Types.Tx.Constraints ( TxSize (..) ) import Cardano.Wallet.Shelley.Transaction - ( mkByronWitness + ( _decodeSealedTx + , mkByronWitness , mkDelegationCertificates - , _decodeSealedTx ) import Cardano.Wallet.Transaction ( DelegationAction (..) @@ -266,7 +266,6 @@ import Internal.Cardano.Write.Tx , TxIn , TxOut , TxOutInRecentEra (..) - , TxOutInRecentEra (..) , UTxO , fromCardanoApiTx , fromCardanoApiUTxO @@ -434,26 +433,26 @@ import qualified Cardano.Wallet.Primitive.Types as W.Block import qualified Cardano.Wallet.Primitive.Types.Address as W ( Address (..) ) -import qualified Cardano.Wallet.Primitive.Types.Coin as W.Coin import qualified Cardano.Wallet.Primitive.Types.Coin as W ( Coin (..) ) +import qualified Cardano.Wallet.Primitive.Types.Coin as W.Coin import qualified Cardano.Wallet.Primitive.Types.Coin.Gen as W import qualified Cardano.Wallet.Primitive.Types.Hash as W ( Hash (..) , mockHash ) -import qualified Cardano.Wallet.Primitive.Types.TokenBundle as W.TokenBundle import qualified Cardano.Wallet.Primitive.Types.TokenBundle as W ( TokenBundle ) +import qualified Cardano.Wallet.Primitive.Types.TokenBundle as W.TokenBundle import qualified Cardano.Wallet.Primitive.Types.TokenBundle.Gen as W import qualified Cardano.Wallet.Primitive.Types.Tx.TxIn as W import qualified Cardano.Wallet.Primitive.Types.Tx.TxIn.Gen as W -import qualified Cardano.Wallet.Primitive.Types.Tx.TxOut as W.TxOut import qualified Cardano.Wallet.Primitive.Types.Tx.TxOut as W ( TxOut (..) ) +import qualified Cardano.Wallet.Primitive.Types.Tx.TxOut as W.TxOut import qualified Cardano.Wallet.Primitive.Types.Tx.TxOut.Gen as TxOutGen import qualified Cardano.Wallet.Primitive.Types.UTxO as W import qualified Cardano.Wallet.Shelley.Compatibility.Ledger as Convert