From cc3477192809030044dc0729c42fcf4cf96bb5a9 Mon Sep 17 00:00:00 2001
From: Alexander Krotov <ilabdsf@gmail.com>
Date: Wed, 28 Feb 2018 14:43:36 +0300
Subject: Muse reader: add test for verse tag with one empty line

---
 test/Tests/Readers/Muse.hs | 6 ++++++
 1 file changed, 6 insertions(+)

(limited to 'test')

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 [ "{{{"
-- 
cgit v1.2.3