diff --git a/changelog.d/5-internal/federator-log b/changelog.d/5-internal/federator-log new file mode 100644 index 0000000000..ae5f62c403 --- /dev/null +++ b/changelog.d/5-internal/federator-log @@ -0,0 +1 @@ +Lower the log level of federator inotify diff --git a/services/federator/src/Federator/Monitor/Internal.hs b/services/federator/src/Federator/Monitor/Internal.hs index 4d38328bdc..b1a050e0f6 100644 --- a/services/federator/src/Federator/Monitor/Internal.hs +++ b/services/federator/src/Federator/Monitor/Internal.hs @@ -139,7 +139,7 @@ delMonitor monitor = Polysemy.resourceToIOFinal stop (wd, _) = do -- ignore exceptions when removing watches embed . void . try @IOException $ removeWatch wd - Log.debug $ + Log.trace $ Log.msg ("stopped watching file" :: Text) . Log.field "descriptor" (show wd) @@ -153,7 +153,7 @@ mkMonitor :: Sem r Monitor mkMonitor runSem tlsVar rs = do inotify <- embed initINotify - Log.debug $ + Log.trace $ Log.msg ("inotify initialized" :: Text) . Log.field "inotify" (show inotify) @@ -244,7 +244,7 @@ addWatchedFile monitor wpath = do let pathText = Text.decodeUtf8With Text.lenientDecode (watchedPath wpath) case r of Right w -> - Log.debug $ + Log.trace $ Log.msg ("watching file" :: Text) . Log.field "descriptor" (show w) . Log.field "path" pathText