From 6d6f6f32aa9df377f332b88be5cc05cdeead2cf7 Mon Sep 17 00:00:00 2001 From: Manuel Date: Thu, 13 May 2021 06:25:21 +0200 Subject: [PATCH] Disable buffering to fix Docker logs --- app/Main.hs | 2 ++ 1 file changed, 2 insertions(+) diff --git a/app/Main.hs b/app/Main.hs index 3a98586..a64cb5c 100644 --- a/app/Main.hs +++ b/app/Main.hs @@ -1,5 +1,6 @@ module Main where +import System.IO (BufferMode (NoBuffering), hSetBuffering, stdout) import Options.Applicative import Myriad @@ -31,5 +32,6 @@ parseArgs = execParser $ info (helper <*> args) (fullDesc <> progDesc "Run the M main :: IO () main = do + hSetBuffering stdout NoBuffering Args { configPath, languagesDir } <- parseArgs runMyriadServer configPath languagesDir