@@ -114,6 +114,7 @@ main = do
114114 then mapM runLhsReaderTest lhsReaderFormats
115115 else putStrLn "Skipping lhs reader tests because they presuppose highlighting support" >> return []
116116 let results = r1s ++
117+
117118 [ r2, r3, r4, r5 -- S5
118119 , r6, r7, r7a -- markdown reader
119120 , r8, r8a -- rst
@@ -167,7 +168,8 @@ runTest testname opts inp norm = do
167168 let normPath = norm
168169 hFlush stdout
169170 -- Note: COLUMNS must be set for markdown table reader
170− ph <- runProcess pandocPath (opts ++ [inpPath] ++ ["--data-dir", ".."]) Nothing (Just [("COLUMNS", "80")]) Nothing (Just hOut) (Just stderr)
171+ ph <- runProcess pandocPath (opts ++ [inpPath] ++ ["--data-dir", ".."]) Nothing
172+ (Just [("LANG","en_US.UTF-8"),("COLUMNS", "80")]) Nothing (Just hOut) (Just stderr)
171173 ec <- waitForProcess ph
172174 result <- if ec == ExitSuccess
173175 then do