diff options
| author | Alexander Krotov <ilabdsf@gmail.com> | 2018-09-11 14:10:20 +0300 |
|---|---|---|
| committer | Alexander Krotov <ilabdsf@gmail.com> | 2018-09-11 14:10:20 +0300 |
| commit | 1aac754359d44a96e30e96f61f38c58d6aea29b4 (patch) | |
| tree | 9690af530de277527e91bee775ef95639e11af59 /src/Text/Pandoc/Writers | |
| parent | e6ba0cc8936a0520bee96de6c2eb42973caa4058 (diff) | |
| download | pandoc-1aac754359d44a96e30e96f61f38c58d6aea29b4.tar.gz | |
Muse writer: set envInsideBlock = True when rendering notes
Diffstat (limited to 'src/Text/Pandoc/Writers')
| -rw-r--r-- | src/Text/Pandoc/Writers/Muse.hs | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/src/Text/Pandoc/Writers/Muse.hs b/src/Text/Pandoc/Writers/Muse.hs index 26349493b..13c9c23b7 100644 --- a/src/Text/Pandoc/Writers/Muse.hs +++ b/src/Text/Pandoc/Writers/Muse.hs @@ -293,7 +293,8 @@ noteToMuse :: PandocMonad m -> Muse m Doc noteToMuse num note = hang (length marker) (text marker) <$> - (local (\env -> env { envInlineStart = True + (local (\env -> env { envInsideBlock = True + , envInlineStart = True , envAfterSpace = True }) $ blockListToMuse note) where |