diff options
author | John MacFarlane <jgm@berkeley.edu> | 2011-11-18 18:22:09 -0800 |
---|---|---|
committer | John MacFarlane <jgm@berkeley.edu> | 2011-11-18 18:22:09 -0800 |
commit | 965c9415b0daed39e5c7d43f413d99b32645cc2f (patch) | |
tree | d87bb48f97b9e4eaea39408d1478eb011152b757 /src/Text/Pandoc/Writers/Asciidoc.hs | |
parent | 11f6177670a7e0b15a42c7576a988c083d9c77e2 (diff) | |
download | pandoc-965c9415b0daed39e5c7d43f413d99b32645cc2f.tar.gz |
Ensure blank line before html passthrough.
Diffstat (limited to 'src/Text/Pandoc/Writers/Asciidoc.hs')
-rw-r--r-- | src/Text/Pandoc/Writers/Asciidoc.hs | 2 |
1 files changed, 1 insertions, 1 deletions
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 |