Minor formatting changes

input-output-hk · Apr 30, 2024 · 84bbf45 · 84bbf45
1 parent 3fa5c1c
commit 84bbf45
Showing 1 changed file with 9 additions and 1 deletion.
diff --git a/hydra-node/src/Hydra/Node/Network.hs b/hydra-node/src/Hydra/Node/Network.hs
@@ -133,7 +133,15 @@ withNetwork tracer configuration callback action = do
         withFlipHeartbeats $
           withReliability (contramap Reliability tracer) messagePersistence me otherParties $
             withAuthentication (contramap Authentication tracer) signingKey otherParties $
-              withOuroborosNetwork (contramap Network tracer) HydraNetworkConfig{protocolVersion = currentHydraVersionedProtocol, localHost, remoteHosts = peers} (\HydraHandshakeRefused{remoteHost} -> callback . ConnectivityEvent $ HandshakeFailure remoteHost)
+              withOuroborosNetwork
+                (contramap Network tracer)
+                HydraNetworkConfig
+                  { protocolVersion = currentHydraVersionedProtocol
+                  , localHost
+                  , remoteHosts = peers
+                  }
+                ( \HydraHandshakeRefused{remoteHost} -> callback . ConnectivityEvent $ HandshakeFailure remoteHost
+                )
 
   withHeartbeat nodeId reliability (callback . mapHeartbeat) $ \network ->
     action network