aboutsummaryrefslogtreecommitdiff
path: root/tests/Tests/Readers
diff options
context:
space:
mode:
authorJohn MacFarlane <jgm@berkeley.edu>2014-07-07 22:27:28 -0600
committerJohn MacFarlane <jgm@berkeley.edu>2014-07-07 22:27:28 -0600
commitd1ac594d4ad2303e1fc0899b0232863686738650 (patch)
treea957f6fbd6b8983570828e0f3fe7fd35edba628b /tests/Tests/Readers
parentf96a2b91f52c102f3ac945019bc9bae40c3b10fa (diff)
downloadpandoc-d1ac594d4ad2303e1fc0899b0232863686738650.tar.gz
Added test for issue #1330.
Diffstat (limited to 'tests/Tests/Readers')
-rw-r--r--tests/Tests/Readers/Markdown.hs6
1 files changed, 6 insertions, 0 deletions
diff --git a/tests/Tests/Readers/Markdown.hs b/tests/Tests/Readers/Markdown.hs
index 8048d2cae..709026d92 100644
--- a/tests/Tests/Readers/Markdown.hs
+++ b/tests/Tests/Readers/Markdown.hs
@@ -154,6 +154,12 @@ tests = [ testGroup "inline code"
[ "in URL" =:
"\\begin\n" =?> para (text "\\begin")
]
+ , testGroup "raw HTML"
+ [ "nesting (issue #1330)" =:
+ "<del>test</del>" =?>
+ rawBlock "html" "<del>" <> plain (str "test") <>
+ rawBlock "html" "</del>"
+ ]
, "unbalanced brackets" =:
"[[[[[[[[[[[[[[[hi" =?> para (text "[[[[[[[[[[[[[[[hi")
, testGroup "backslash escapes"