fourmolu fixes

Author: hamishmack

cardano-chain-gen/src/Cardano/Mock/Forging/Tx/Conway.hs

@@ -8,10 +8,6 @@
 {-# LANGUAGE TypeApplications #-}
 {-# LANGUAGE TypeFamilies #-}
 
-
-
-
-
 module Cardano.Mock.Forging.Tx.Conway (
   ConwayLedgerState,
   Babbage.TxOutScriptType (..),

cardano-db-sync/src/Cardano/DbSync/Sync.hs

@@ -1,13 +1,13 @@
 {-# LANGUAGE AllowAmbiguousTypes #-}
 {-# LANGUAGE DataKinds #-}
 {-# LANGUAGE FlexibleContexts #-}
+{-# LANGUAGE LambdaCase #-}
 {-# LANGUAGE OverloadedStrings #-}
 {-# LANGUAGE RankNTypes #-}
 {-# LANGUAGE ScopedTypeVariables #-}
 {-# LANGUAGE TypeApplications #-}
 {-# LANGUAGE TypeFamilies #-}
 {-# LANGUAGE NoImplicitPrelude #-}
-{-# LANGUAGE LambdaCase #-}
 
 module Cardano.DbSync.Sync (
   ConfigFile (..),
@@ -138,11 +138,11 @@ runSyncNodeClient metricsSetters syncEnv iomgr trce tc (SocketPath socketPath) =
         { spAddress = Snocket.localAddressFromPath socketPath
         , spReconnectionDelay = Nothing
         , spCompleteCb = \case
-              Left e ->
-                case fromException e of
-                  Just AsyncCancelled -> Abort
-                  _other -> Reconnect
-              Right _ -> Reconnect
+            Left e ->
+              case fromException e of
+                Just AsyncCancelled -> Abort
+                _other -> Reconnect
+            Right _ -> Reconnect
         }
 
     subscriptionTracers =