From 1cbdf39e250d2f1303d487680ac6e1405c2faabd Mon Sep 17 00:00:00 2001 From: Valentin Reis Date: Fri, 14 Dec 2018 08:59:09 -0600 Subject: [PATCH] [Refactor] aesthetics --- argotest/src/Argotest.hs | 5 ----- 1 file changed, 5 deletions(-) diff --git a/argotest/src/Argotest.hs b/argotest/src/Argotest.hs index 5059dff..3a65073 100644 --- a/argotest/src/Argotest.hs +++ b/argotest/src/Argotest.hs @@ -116,10 +116,6 @@ prepareDaemonShell dargs daemon_out daemon_err nrm_log = do return $ twoWayPrint daemon_out daemon_err $ inprocWithErr "daemon" (dargs ++ ["--nrm_log", Text.pack $ encodeString nrm_log]) empty - --twoWayPrint l - --case l of - -- Left out -> output daemon_out $ return out - -- Right err -> output daemon_err $ return err twoWayPrint :: FilePath -> FilePath -> Shell (Either Line Line) -> IO () twoWayPrint outPath errPath s = sh $ do @@ -135,4 +131,3 @@ cmdShell manifest app cmd_out cmd_err = ExitSuccess -> printInfo "cmd has exited successfuly.\n" ExitFailure n -> die ("cmd failed with exit code " <> repr n <> " . The application logs are at " <> repr cmd_out <> " " <> repr cmd_err ) - -- 2.26.2