diff --git a/lib/core/src/Cardano/Wallet/Network/Ports.hs b/lib/core/src/Cardano/Wallet/Network/Ports.hs
index bcd5d254734..4b5b88bbea3 100644
--- a/lib/core/src/Cardano/Wallet/Network/Ports.hs
+++ b/lib/core/src/Cardano/Wallet/Network/Ports.hs
@@ -39,9 +39,7 @@ import Control.Monad.IO.Class
 import Control.Retry
     ( RetryPolicyM, retrying )
 import Data.List
-    ( isInfixOf )
-import Data.List
-    ( sort )
+    ( isInfixOf, sort )
 import Data.Streaming.Network
     ( bindRandomPortTCP )
 import Data.Word
diff --git a/lib/shelley/test/integration/Main.hs b/lib/shelley/test/integration/Main.hs
index d8a5f18b472..a1a33c92c6d 100644
--- a/lib/shelley/test/integration/Main.hs
+++ b/lib/shelley/test/integration/Main.hs
@@ -180,7 +180,7 @@ specWithServer tr = aroundAll withContext . after tearDown
             either pure (throwIO . ProcessHasExited "integration")
 
     withServer action =
-        ((=<<) (either throwIO pure)) $
+        ((either throwIO pure) =<<) $
         withCluster tr Info 0 $ \socketPath block0 (gp,vData) ->
         withSystemTempDirectory "cardano-wallet-databases" $ \db -> do
             serveWallet @(IO Shelley)