summaryrefslogtreecommitdiff
path: root/test
diff options
context:
space:
mode:
authorAlexander Krotov <ilabdsf@gmail.com>2018-02-28 12:11:56 +0300
committerAlexander Krotov <ilabdsf@gmail.com>2018-02-28 12:11:56 +0300
commita7ac590b083f98bc6c98530077f0ed78e232bc0d (patch)
treebc7b0ad6e4290d8477651301cca5646bd0422787 /test
parent83ce0a789ddcdb7ab8eaa8c21f25af88aa5a7c67 (diff)
Muse reader: allow <quote> and other tags to be indented
Diffstat (limited to 'test')
-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 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>"
, ""