From 8eae978eae38abb7ea96189166490dc72ff40a40 Mon Sep 17 00:00:00 2001 From: MattK Date: Fri, 24 Jul 2015 12:14:18 -0400 Subject: [PATCH] Enable log capture if stdout is not a terminal --- src/PostgREST/Main.hs | 6 ++++++ 1 file changed, 6 insertions(+) diff --git a/src/PostgREST/Main.hs b/src/PostgREST/Main.hs index 58cd0ea07..8592f5538 100644 --- a/src/PostgREST/Main.hs +++ b/src/PostgREST/Main.hs @@ -24,6 +24,8 @@ import qualified Hasql as H import qualified Hasql.Postgres as P import Options.Applicative hiding (columns) +import System.IO (stderr, stdin, stdout, hSetBuffering, BufferMode(..)) + import PostgREST.Config (AppConfig(..), argParser, corsPolicy) isServerVersionSupported = do @@ -32,6 +34,10 @@ isServerVersionSupported = do main :: IO () main = do + hSetBuffering stdout LineBuffering + hSetBuffering stdin LineBuffering + hSetBuffering stderr NoBuffering + let opts = info (helper <*> argParser) $ fullDesc <> progDesc (