jimmy/postgrest
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

refactor: make stdout explicit on Logger

Browse Source 
Otherwise it's hard to know we're logging to stdout.
This commit is contained in:
steve-chavez
2024-04-14 20:10:01 -05:00
committed by Steve Chavez
parent 973201a8d3
commit c57ec52229
1 changed files with 9 additions and 5 deletions
Download Patch File Download Diff File Expand all files Collapse all files
src/PostgREST/Logger.hs
+9 -5
View File
@@ -61,11 +61,15 @@ middleware logLevel = case logLevel of
LogError -> requestLogger (>= status500) LogError -> requestLogger (>= status500)
LogCrit -> requestLogger (const False) LogCrit -> requestLogger (const False)
where where
requestLogger filterStatus = unsafePerformIO $ Wai.mkRequestLogger Wai.defaultRequestLoggerSettings requestLogger filterStatus = unsafePerformIO $
{ Wai.outputFormat = Wai.ApacheWithSettings $ Wai.mkRequestLogger Wai.defaultRequestLoggerSettings
Wai.defaultApacheSettings { Wai.outputFormat =
& Wai.setApacheRequestFilter (\_ res -> filterStatus $ Wai.responseStatus res) Wai.ApacheWithSettings $
& Wai.setApacheUserGetter Auth.getRole Wai.defaultApacheSettings &
Wai.setApacheRequestFilter (\_ res -> filterStatus $ Wai.responseStatus res) &
Wai.setApacheUserGetter Auth.getRole
, Wai.autoFlush = True
, Wai.destination = Wai.Handle stdout
} }
observationLogger :: LoggerState -> ObservationHandler observationLogger :: LoggerState -> ObservationHandler