diff options
| -rw-r--r-- | test/Tests/Old.hs | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/test/Tests/Old.hs b/test/Tests/Old.hs index ea82bc1b5..a7cea48b4 100644 --- a/test/Tests/Old.hs +++ b/test/Tests/Old.hs @@ -290,8 +290,7 @@ testWithNormalize normalizer pandocPath testname opts inp norm = Just d -> [("DYLD_LIBRARY_PATH", d), ("LD_LIBRARY_PATH", d)] let env = dynlibEnv ++ - [("TMP","."),("LANG","en_US.UTF-8"),("HOME", "./"), - ("pandoc_datadir","..")] + [("TMP","."),("LANG","en_US.UTF-8"),("HOME", "./")] (ec, out) <- pipeProcess (Just env) pandocPath options mempty if ec == ExitSuccess then return $ filter (/='\r') . normalizer @@ -299,7 +298,7 @@ testWithNormalize normalizer pandocPath testname opts inp norm = -- filter \r so the tests will work on Windows machines else fail $ "Pandoc failed with error code " ++ show ec updateGolden = UTF8.writeFile norm - options = ["--quiet"] ++ [inp] ++ opts + options = ["--data-dir=../data","--quiet"] ++ [inp] ++ opts compareValues :: FilePath -> [String] -> String -> String -> IO (Maybe String) compareValues norm options expected actual = do |