summaryrefslogtreecommitdiff
path: root/src/Text/Pandoc/Writers
diff options
context:
space:
mode:
authorAlexander Krotov <ilabdsf@gmail.com>2018-01-22 16:24:44 +0300
committerAlexander Krotov <ilabdsf@gmail.com>2018-01-22 16:24:44 +0300
commit288065cfd44eb02f9ef4e6c9b901e14776246dbb (patch)
tree6f82b583c8d12f5ac04712fdfcd1116490fc54ad /src/Text/Pandoc/Writers
parentb818623d42402027236d04a3300956f3ad3f1295 (diff)
Muse writer: indent lists inside Div
Diffstat (limited to 'src/Text/Pandoc/Writers')
-rw-r--r--src/Text/Pandoc/Writers/Muse.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Text/Pandoc/Writers/Muse.hs b/src/Text/Pandoc/Writers/Muse.hs
index fbebe5c20..23aa98866 100644
--- a/src/Text/Pandoc/Writers/Muse.hs
+++ b/src/Text/Pandoc/Writers/Muse.hs
@@ -259,7 +259,7 @@ blockToMuse (Table caption _ _ headers rows) = do
$$ body
$$ (if null caption then empty else " |+ " <> caption' <> " +|")
$$ blankline
-blockToMuse (Div _ bs) = blockListToMuse bs
+blockToMuse (Div _ bs) = flatBlockListToMuse bs
blockToMuse Null = return empty
-- | Return Muse representation of notes.