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" =: + " -
\n first div breaks\n
\n\n \n\n
\n with this div too.\n
\n" + =?> bulletList [divWith nullAttr (plain $ text "first div breaks") <> + rawBlock "html" "\n" <> + divWith nullAttr (plain $ text "with this div too.")] + ] ]