Muse reader: add test for verse tag with one empty line
commitcc3477192809030044dc0729c42fcf4cf96bb5a9
authorAlexander Krotov <ilabdsf@gmail.com>
dateWed 28 Feb 2018, 14:43 (9 years ago)
parent8b1630a
test/Tests/Readers/Muse.hs+6
@@ -347,6 +347,12 @@ tests =
347347 , text "\160\160One two three"
348348 , ""
349349 ]
350+ , "Verse tag with empty line inside" =:
351+ T.unlines [ "<verse>"
352+ , ""
353+ , "</verse>"
354+ ] =?>
355+ lineBlock [ "" ]
350356 , testGroup "Example"
351357 [ "Braces on separate lines" =:
352358 T.unlines [ "{{{"