From 7751391fce9a51066e02ecbe3677e69224c2161d Mon Sep 17 00:00:00 2001
From: Alexander Krotov <ilabdsf@gmail.com>
Date: Wed, 29 Nov 2017 05:09:10 +0300
Subject: Muse reader: correctly remove indentation from notes

Exactly one space is required and considered to be part of the marker.
---
 test/Tests/Readers/Muse.hs | 8 ++++++++
 1 file changed, 8 insertions(+)

(limited to 'test')

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