No longer need to set 'HOME' in RunTests.hs.

git-svn-id: https://pandoc.googlecode.com/svn/trunk@1843 788f1e2b-df1e-0410-8736-df70ead52e1b
This commit is contained in:
fiddlosopher 2010-02-21 16:47:28 +00:00
parent 40ea955e23
commit b165e4c50c

View file

@ -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