From 35e2caa05863002acb64ce34504fb4424d2bc441 Mon Sep 17 00:00:00 2001
From: John MacFarlane <fiddlosopher@gmail.com>
Date: Sat, 13 Jul 2013 13:47:09 -0700
Subject: Updated a test whose output changed due to last commit.
---
tests/Tests/Writers/HTML.hs | 5 +----
1 file changed, 1 insertion(+), 4 deletions(-)
(limited to 'tests')
diff --git a/tests/Tests/Writers/HTML.hs b/tests/Tests/Writers/HTML.hs
index 1693f2fc1..84f4db191 100644
--- a/tests/Tests/Writers/HTML.hs
+++ b/tests/Tests/Writers/HTML.hs
@@ -6,7 +6,6 @@ import Text.Pandoc.Builder
import Text.Pandoc
import Tests.Helpers
import Tests.Arbitrary()
-import Text.Highlighting.Kate (languages) -- null if no hl support
html :: (ToString a, ToPandoc a) => a -> String
html = writeHtmlString def{ writerWrapText = False } . toPandoc
@@ -32,9 +31,7 @@ tests :: [Test]
tests = [ testGroup "inline code"
[ "basic" =: code "@&" =?> "<code>@&</code>"
, "haskell" =: codeWith ("",["haskell"],[]) ">>="
- =?> if null languages
- then "<code class=\"haskell\">>>=</code>"
- else "<code class=\"sourceCode haskell\"><span class=\"fu\">>>=</span></code>"
+ =?> "<code class=\"haskell\">>>=</code>"
, "nolanguage" =: codeWith ("",["nolanguage"],[]) ">>="
=?> "<code class=\"nolanguage\">>>=</code>"
]
--
cgit v1.2.3