brig-index: Log JSONs

Author: akshaymankar

services/brig/brig.cabal

@@ -341,6 +341,7 @@ executable brig-index
   build-depends:
     , base
     , brig
+    , extended
     , imports
     , optparse-applicative
     , tinylog

services/brig/index/src/Main.hs

@@ -26,6 +26,7 @@ import Imports
 import Options.Applicative
 import System.Exit
 import System.Logger.Class qualified as Log
+import System.Logger.Extended
 
 main :: IO ()
 main = do
@@ -39,9 +40,4 @@ main = do
       header "brig-index"
         <> progDesc "Brig Search Index Utilities"
         <> fullDesc
-    initLogger =
-      Log.new -- TODO: use mkLogger'?
-        . Log.setOutput Log.StdOut
-        . Log.setFormat Nothing
-        . Log.setBufSize 0
-        $ Log.defSettings
+    initLogger = mkLogger Debug Nothing (Just $ Last JSON)