diff options
| -rw-r--r-- | tests/RunTests.hs | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/tests/RunTests.hs b/tests/RunTests.hs index 635c0b8b0..6dc0d6e18 100644 --- a/tests/RunTests.hs +++ b/tests/RunTests.hs @@ -152,9 +152,8 @@ runTest testname opts inp norm = do let inpPath = inp let normPath = norm hFlush stdout - env <- getEnvironment -- we need at least HOME so pandoc can find data files -- Note: COLUMNS must be set for markdown table reader - ph <- runProcess pandocPath (opts ++ [inpPath] ++ ["--data-dir", ".."]) Nothing (Just (("COLUMNS", "80"):env)) Nothing (Just hOut) (Just stderr) + ph <- runProcess pandocPath (opts ++ [inpPath] ++ ["--data-dir", ".."]) Nothing (Just [("COLUMNS", "80")]) Nothing (Just hOut) (Just stderr) ec <- waitForProcess ph result <- if ec == ExitSuccess then do |