git.iko.soy/typeable/pandoc
on master help sign in
Muse reader: add test for verse tag with one empty line
cc34771Alexander Krotov
test/Tests/Readers/Muse.hs+6
@@ -347,6 +347,12 @@ tests =
347 , text "\160\160One two three"
347 , text "\160\160One two three"
348 , ""
348 , ""
349 ]
349 ]
350+ , "Verse tag with empty line inside" =:
351+ T.unlines [ "<verse>"
352+ , ""
353+ , "</verse>"
354+ ] =?>
355+ lineBlock [ "" ]
350 , testGroup "Example"
356 , testGroup "Example"
351 [ "Braces on separate lines" =:
357 [ "Braces on separate lines" =:
352 T.unlines [ "{{{"
358 T.unlines [ "{{{"