From 288065cfd44eb02f9ef4e6c9b901e14776246dbb Mon Sep 17 00:00:00 2001
From: Alexander Krotov <ilabdsf@gmail.com>
Date: Mon, 22 Jan 2018 16:24:44 +0300
Subject: Muse writer: indent lists inside Div
---
src/Text/Pandoc/Writers/Muse.hs | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
(limited to 'src')
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.
--
cgit v1.2.3