From a7ac590b083f98bc6c98530077f0ed78e232bc0d Mon Sep 17 00:00:00 2001
From: Alexander Krotov <ilabdsf@gmail.com>
Date: Wed, 28 Feb 2018 12:11:56 +0300
Subject: Muse reader: allow <quote> and other tags to be indented

---
 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 d951fca49..3537ab040 100644
--- a/test/Tests/Readers/Muse.hs
+++ b/test/Tests/Readers/Muse.hs
@@ -328,6 +328,12 @@ tests =
                   , "</quote>"
                   ] =?>
         blockQuote (para "foo" <> blockQuote (para "bar") <> para "baz")
+      , "Indented quote inside list" =:
+        T.unlines [ " -  <quote>"
+                  , "    foo"
+                  , "    </quote>"
+                  ] =?>
+        bulletList [ blockQuote (para "foo") ]
       , "Verse tag" =:
         T.unlines [ "<verse>"
                   , ""
-- 
cgit v1.2.3