From 4060df6891bf38090de90081c081e80be1565193 Mon Sep 17 00:00:00 2001
From: John MacFarlane <jgm@berkeley.edu>
Date: Mon, 3 Dec 2018 15:10:13 -0800
Subject: Markdown writer: include needed whitespace after HTML figure.

We use HTML for a figure in markdown dialects that can't
represent it natively.

Closes #5121.
---
 src/Text/Pandoc/Writers/Markdown.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'src/Text/Pandoc/Writers')

diff --git a/src/Text/Pandoc/Writers/Markdown.hs b/src/Text/Pandoc/Writers/Markdown.hs
index 6f3160ed2..c0c6e8ebf 100644
--- a/src/Text/Pandoc/Writers/Markdown.hs
+++ b/src/Text/Pandoc/Writers/Markdown.hs
@@ -463,7 +463,7 @@ blockToMarkdown' opts (Para [Image attr alt (src,'f':'i':'g':':':tit)])
   | isEnabled Ext_raw_html opts &&
     not (isEnabled Ext_link_attributes opts) &&
     attr /= nullAttr = -- use raw HTML
-    (text . T.unpack . T.strip) <$>
+    ((<> blankline) . text . T.unpack . T.strip) <$>
       writeHtml5String opts{ writerTemplate = Nothing }
         (Pandoc nullMeta [Para [Image attr alt (src,"fig:" ++ tit)]])
   | otherwise = blockToMarkdown opts (Para [Image attr alt (src,tit)])
-- 
cgit v1.2.3