aboutsummaryrefslogtreecommitdiff
path: root/test/Tests/Readers
diff options
context:
space:
mode:
authorAlexander Krotov <ilabdsf@gmail.com>2017-11-29 05:09:10 +0300
committerAlexander Krotov <ilabdsf@gmail.com>2017-11-29 05:12:25 +0300
commit7751391fce9a51066e02ecbe3677e69224c2161d (patch)
treeff8cc2269cbc37554cfc11fed31cd880b94d64a6 /test/Tests/Readers
parent0105a3c2930675971ea83da3b987c6b62f97ce26 (diff)
downloadpandoc-7751391fce9a51066e02ecbe3677e69224c2161d.tar.gz
Muse reader: correctly remove indentation from notes
Exactly one space is required and considered to be part of the marker.
Diffstat (limited to 'test/Tests/Readers')
-rw-r--r--test/Tests/Readers/Muse.hs8
1 files changed, 8 insertions, 0 deletions
diff --git a/test/Tests/Readers/Muse.hs b/test/Tests/Readers/Muse.hs
index 0cccb50e6..c0da48586 100644
--- a/test/Tests/Readers/Muse.hs
+++ b/test/Tests/Readers/Muse.hs
@@ -385,6 +385,14 @@ tests =
, " </example>"
] =?>
definitionList [ ("term", [codeBlock "foo" <> para "bar" <> codeBlock "baz"]) ]
+ , "Example inside note" =:
+ T.unlines [ "Foo[1]"
+ , ""
+ , "[1] <example>"
+ , " bar"
+ , " </example>"
+ ] =?>
+ para ("Foo" <> note (codeBlock "bar"))
]
, testGroup "Literal blocks"
[ test emacsMuse "Literal block"