Logging in http

2026-09-25 12:10:24 +03:00
parent 5d16bf4ade
commit d6f785662b
2 changed files with 23 additions and 14 deletions
@@ -115,7 +115,7 @@ defaultMain = withSocketsDo $ do
          [ ("reader", readerAction host 8123 token ents bus)
          , ("writer", writerAction writerLimiter bus)
          , ("metrics", HomeAssistant.Runtime.Metrics.metricsAction store rrdPath rrdtool)
-          , ("metrics-http", HttpServer.runHttpServer rrdPath rrdtool metricsPort)
+          , ("metrics-http", HttpServer.runHttpServer (busLogEnv bus) rrdPath rrdtool metricsPort)
          ] ++ [ (name, runController rootPath bus c) | c@(Controller True name _) <- active ]
    runKatipContextT (busLogEnv bus) () mempty $
      mapConcurrently_ (uncurry supervised) workers