diff options
| author | Łukasz Hanuszczak <lukasz.hanuszczak@gmail.com> | 2015-08-06 18:58:46 +0200 |
|---|---|---|
| committer | Łukasz Hanuszczak <lukasz.hanuszczak@gmail.com> | 2015-08-22 23:40:27 +0200 |
| commit | 16eb78529ebd0cf438aed500edec2eef6612cbcb (patch) | |
| tree | 931382cab543227112ee44db6f191246658d4c12 | |
| parent | 0c28e3fc12a905eac5ffbcd124aedc0fb41de271 (diff) | |
Fix issue with output being printed in incorrect order.
| -rwxr-xr-x | html-test/run.hs | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/html-test/run.hs b/html-test/run.hs index afd60a13..4103ad04 100755 --- a/html-test/run.hs +++ b/html-test/run.hs @@ -180,8 +180,10 @@ diffModule diff mdl = do writeFile refFile' $ Xml.ppElement refXml' putStrLn $ "Diff for module " ++ show mdl ++ ":" + hFlush stdout handle <- runProcess' diff $ processConfig { pcArgs = [outFile', refFile'] + , pcStdOut = Just $ stdout } waitForProcess handle >> return () where |