summaryrefslogtreecommitdiff
path: root/tests/Tests
diff options
context:
space:
mode:
authorJohn MacFarlane <jgm@berkeley.edu>2014-05-04 08:19:48 -0700
committerJohn MacFarlane <jgm@berkeley.edu>2014-05-04 08:19:48 -0700
commit1e5042489223edc4eb5fa428ee47ed525bc1f83f (patch)
tree0ff21b8794116b1e9cbabd30f42e165844285ab5 /tests/Tests
parent3e42f08e87c4795b260154e9747df29bc1613ccc (diff)
Added test for #1154.
Diffstat (limited to 'tests/Tests')
-rw-r--r--tests/Tests/Readers/Markdown.hs9
1 files changed, 9 insertions, 0 deletions
diff --git a/tests/Tests/Readers/Markdown.hs b/tests/Tests/Readers/Markdown.hs
index 492680a35..5a51fe759 100644
--- a/tests/Tests/Readers/Markdown.hs
+++ b/tests/Tests/Readers/Markdown.hs
@@ -216,4 +216,13 @@ tests = [ testGroup "inline code"
-- , testGroup "round trip"
-- [ property "p_markdown_round_trip" p_markdown_round_trip
-- ]
+ , testGroup "lists"
+ [ "issue #1154" =:
+ " - <div>\n first div breaks\n </div>\n\n <button>if this button exists</button>\n\n <div>\n with this div too.\n </div>\n"
+ =?> bulletList [divWith nullAttr (plain $ text "first div breaks") <>
+ rawBlock "html" "<button>" <>
+ plain (text "if this button exists") <>
+ rawBlock "html" "</button>\n" <>
+ divWith nullAttr (plain $ text "with this div too.")]
+ ]
]