aboutsummaryrefslogtreecommitdiff
path: root/test/Tests/Readers/Muse.hs
diff options
context:
space:
mode:
authorAlexander Krotov <ilabdsf@gmail.com>2018-08-31 15:57:58 +0300
committerAlexander Krotov <ilabdsf@gmail.com>2018-08-31 16:43:07 +0300
commit56685e8735e62af2855ae5703a10829979f32a46 (patch)
tree1352df00bf5170a3934492443138a2dc0558686a /test/Tests/Readers/Muse.hs
parentd63202c2f40123acf0a8f0242b53eeffd11c51e2 (diff)
downloadpandoc-56685e8735e62af2855ae5703a10829979f32a46.tar.gz
Muse reader: parse <verse> tag in one pass
instead of using parseFromString. This change makes it possible to have verbatim </verse> tag inside verse.
Diffstat (limited to 'test/Tests/Readers/Muse.hs')
-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 a2c9cbc7e..20603b8fb 100644
--- a/test/Tests/Readers/Muse.hs
+++ b/test/Tests/Readers/Muse.hs
@@ -407,6 +407,12 @@ tests =
, "</verse>"
] =?>
lineBlock [ "" ]
+ , "Verse tag with verbatim close tag inside" =:
+ T.unlines [ "<verse>"
+ , "<verbatim></verse></verbatim>"
+ , "</verse>"
+ ] =?>
+ lineBlock [ "</verse>" ]
, testGroup "Example"
[ "Braces on separate lines" =:
T.unlines [ "{{{"