summaryrefslogtreecommitdiff
path: root/tests/Tests/Readers
diff options
context:
space:
mode:
authorJohn MacFarlane <jgm@berkeley.edu>2015-05-03 15:06:40 -0700
committerJohn MacFarlane <jgm@berkeley.edu>2015-05-03 15:06:40 -0700
commit64b1394fe2a089828bd58303b23ca461b837cb22 (patch)
treef8b2957bf78d10e0e49278f5515574f9a772c905 /tests/Tests/Readers
parent8a77eb4c9c4a280debc067f632f9210bc8cbb5eb (diff)
Make sure a closing `</div>` doesn't get included in a defn list item.
Closes #2127.
Diffstat (limited to 'tests/Tests/Readers')
-rw-r--r--tests/Tests/Readers/Markdown.hs4
1 files changed, 4 insertions, 0 deletions
diff --git a/tests/Tests/Readers/Markdown.hs b/tests/Tests/Readers/Markdown.hs
index 9904cb9f1..ed79f9e3d 100644
--- a/tests/Tests/Readers/Markdown.hs
+++ b/tests/Tests/Readers/Markdown.hs
@@ -279,6 +279,10 @@ tests = [ testGroup "inline code"
, "list in definition" =:
"foo\n: - bar\n" =?>
definitionList [ (text "foo", [bulletList [plain (text "bar")]]) ]
+ , "in div" =:
+ "<div>foo\n: - bar\n</div>" =?>
+ divWith nullAttr (definitionList
+ [ (text "foo", [bulletList [plain (text "bar")]]) ])
]
, testGroup "+compact_definition_lists"
[ test markdownCDL "basic compact list" $