Lower the log level of federator inotify (#3056)

* Lower the log level of federator inotify --------- Co-authored-by: jschaul <[email protected]>
wireapp · Feb 3, 2023 · f6e46c3 · f6e46c3
1 parent 716b5f8
commit f6e46c3
Show file tree

Hide file tree

Showing 2 changed files with 4 additions and 3 deletions.
diff --git a/changelog.d/5-internal/federator-log 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
@@ -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