Fixed lhs test cases.

+ Changed Setup.hs in accord with change in '--version'
  output.
+ Changed lhs test cases in accord with change in
  the way HTML headers are written (they are now put
  in divs, and the id is put on the div rather than the
  header itself).

git-svn-id: https://pandoc.googlecode.com/svn/trunk@1588 788f1e2b-df1e-0410-8736-df70ead52e1b

1 files changed, 1 insertions, 1 deletions

diff --git a/Setup.hs b/Setup.hs
index 4dc25449d..d808a65b8 100644
--- a/Setup.hs
+++ b/Setup.hs
@@ -22,7 +22,7 @@ runTestSuite _ _ _ _ = do
   (outputPath, hOut) <- openTempFile tempPath "out"
   runProcess "pandoc" ["--version"] Nothing Nothing Nothing (Just hOut) Nothing >>= waitForProcess
   output <- readFile outputPath
-  let highlightingSupport = "+highlighting" `isInfixOf` output
+  let highlightingSupport = "with syntax highlighting" `isInfixOf` output
   let testArgs = if highlightingSupport then ["lhs"] else []
   let testCmd  = "runhaskell -i.. RunTests.hs " ++ unwords testArgs
   inDirectory "tests" $ runCommand testCmd >>= waitForProcess >>= exitWith