summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorAlexander Krotov <ilabdsf@gmail.com>2018-02-28 14:43:36 +0300
committerAlexander Krotov <ilabdsf@gmail.com>2018-02-28 14:43:36 +0300
commitcc3477192809030044dc0729c42fcf4cf96bb5a9 (patch)
tree78e84fcc58ef7fe617ba2c4ceed90b0e38987de5
parent8b1630aae029a0c4ce6e6dc881d3e11d0ca7e9ce (diff)
Muse reader: add test for verse tag with one empty line
-rw-r--r--test/Tests/Readers/Muse.hs6
1 files changed, 6 insertions, 0 deletions
diff --git a/test/Tests/Readers/Muse.hs b/test/Tests/Readers/Muse.hs
index 3537ab040..c45e0bfcf 100644
--- a/test/Tests/Readers/Muse.hs
+++ b/test/Tests/Readers/Muse.hs
@@ -347,6 +347,12 @@ tests =
, text "\160\160One two three"
, ""
]
+ , "Verse tag with empty line inside" =:
+ T.unlines [ "<verse>"
+ , ""
+ , "</verse>"
+ ] =?>
+ lineBlock [ "" ]
, testGroup "Example"
[ "Braces on separate lines" =:
T.unlines [ "{{{"