Tissevert/pandoc
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions 1

Set LANG to a UTF-8 locale in RunTests.hs.

Browse source 
git-svn-id: https://pandoc.googlecode.com/svn/trunk@1844 788f1e2b-df1e-0410-8736-df70ead52e1b
This commit is contained in:
fiddlosopher 2010-02-21 16:47:33 +00:00
parent b165e4c50c
commit e3ea078b26
1 changed files with 2 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
tests/RunTests.hs
View file

@ -153,7 +153,8 @@ runTest testname opts inp norm = do
let normPath = norm let normPath = norm
hFlush stdout hFlush stdout
-- Note: COLUMNS must be set for markdown table reader -- Note: COLUMNS must be set for markdown table reader
ph <- runProcess pandocPath (opts ++ [inpPath] ++ ["--data-dir", ".."]) Nothing (Just [("COLUMNS", "80")]) Nothing (Just hOut) (Just stderr) -- and we need LANG set for ghc 6.12
ph <- runProcess pandocPath (opts ++ [inpPath] ++ ["--data-dir", ".."]) Nothing (Just [("COLUMNS", "80"),("LANG","en_US.UTF-8")]) Nothing (Just hOut) (Just stderr)
ec <- waitForProcess ph ec <- waitForProcess ph
result <- if ec == ExitSuccess result <- if ec == ExitSuccess
then do then do