From 965c9415b0daed39e5c7d43f413d99b32645cc2f Mon Sep 17 00:00:00 2001 From: John MacFarlane Date: Fri, 18 Nov 2011 18:22:09 -0800 Subject: Ensure blank line before html passthrough. --- src/Text/Pandoc/Writers/Asciidoc.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/Text/Pandoc/Writers/Asciidoc.hs b/src/Text/Pandoc/Writers/Asciidoc.hs index a3df93a3c..d4c9e3c33 100644 --- a/src/Text/Pandoc/Writers/Asciidoc.hs +++ b/src/Text/Pandoc/Writers/Asciidoc.hs @@ -124,7 +124,7 @@ blockToAsciidoc opts (Para inlines) = do else empty return $ esc <> contents <> blankline blockToAsciidoc _ (RawBlock f str) | f == "html" || f == "docbook" = do - return $ "+++" $$ text str $$ "+++" <> blankline + return $ blankline $$ "+++" $$ text str $$ "+++" <> blankline blockToAsciidoc _ (RawBlock _ _) = return empty blockToAsciidoc _ HorizontalRule = return $ blankline <> text "'''''" <> blankline -- cgit v1.2.3