@@ -212,7 +212,7 @@ testWithNormalize normalizer testname opts inp norm = testCase testname $ do
212212 let options = ["--data-dir", ".."] ++ [inpPath] ++ opts
213213 let cmd = pandocPath ++ " " ++ unwords options
214214 ph <- runProcess pandocPath options Nothing
215− (Just [("LANG","en_US.UTF-8"),("HOME", "./")]) Nothing (Just hOut)
215+ (Just [("TMP","."),("LANG","en_US.UTF-8"),("HOME", "./")]) Nothing (Just hOut)
216216 (Just stderr)
217217 ec <- waitForProcess ph
218218 result <- if ec == ExitSuccess