@@ -126,7 +126,7 @@ blockToAsciiDoc :: WriterOptions -- ^ Options
126126blockToAsciiDoc _ Null = return empty
127127blockToAsciiDoc opts (Plain inlines) = do
128128 contents <- inlineListToAsciiDoc opts inlines
129− return $ contents <> cr
129+ return $ contents <> blankline
130130blockToAsciiDoc opts (Para [Image alt (src,'f':'i':'g':':':tit)]) = do
131131 blockToAsciiDoc opts (Para [Image alt (src,tit)])
132132blockToAsciiDoc opts (Para inlines) = do