Try to fix the logs display

input-output-hk · Mar 17, 2023 · 58e6415 · 58e6415
1 parent 3d1c988
commit 58e6415
Showing 1 changed file with 2 additions and 1 deletion.
diff --git a/hydra-node/src/Hydra/Logging.hs b/hydra-node/src/Hydra/Logging.hs
@@ -105,7 +105,8 @@ withTracerOutputTo ::
 withTracerOutputTo hdl namespace action = do
   msgQueue <- newTBQueueIO @_ @(Envelope msg) defaultQueueSize
   withAsync (writeLogs msgQueue) $ \_ ->
-    action (tracer msgQueue) `finally` flushLogs msgQueue
+    action (tracer msgQueue)
+      `finally` flushLogs msgQueue
  where
   tracer queue =
     Tracer $