@@ -152,7 +152,7 @@ runTest testname opts inp norm = do
152 hFlush stdout
152 hFlush stdout
153 env <- getEnvironment -- we need at least HOME so pandoc can find data files
153 env <- getEnvironment -- we need at least HOME so pandoc can find data files
154 -- Note: COLUMNS must be set for markdown table reader
154 -- Note: COLUMNS must be set for markdown table reader
155− ph <- runProcess pandocPath (opts ++ [inpPath]) Nothing (Just (("COLUMNS", "80"):env)) Nothing (Just hOut) (Just stderr)
155+ ph <- runProcess pandocPath (opts ++ [inpPath] ++ ["--data-dir", ".."]) Nothing (Just (("COLUMNS", "80"):env)) Nothing (Just hOut) (Just stderr)
156 ec <- waitForProcess ph
156 ec <- waitForProcess ph
157 result <- if ec == ExitSuccess
157 result <- if ec == ExitSuccess