@@ -152,9 +152,8 @@ runTest testname opts inp norm = do
152152 let inpPath = inp
153153 let normPath = norm
154154 hFlush stdout
155− env <- getEnvironment -- we need at least HOME so pandoc can find data files
156155 -- Note: COLUMNS must be set for markdown table reader
157− ph <- runProcess pandocPath (opts ++ [inpPath] ++ ["--data-dir", ".."]) Nothing (Just (("COLUMNS", "80"):env)) Nothing (Just hOut) (Just stderr)
156+ ph <- runProcess pandocPath (opts ++ [inpPath] ++ ["--data-dir", ".."]) Nothing (Just [("COLUMNS", "80")]) Nothing (Just hOut) (Just stderr)
158157 ec <- waitForProcess ph
159158 result <- if ec == ExitSuccess
160159 then do