diff options
Diffstat (limited to 'src/Text/Pandoc/Readers')
-rw-r--r-- | src/Text/Pandoc/Readers/Markdown.hs | 3 | ||||
-rw-r--r-- | src/Text/Pandoc/Readers/RST.hs | 1 |
2 files changed, 3 insertions, 1 deletions
diff --git a/src/Text/Pandoc/Readers/Markdown.hs b/src/Text/Pandoc/Readers/Markdown.hs index 44cbbc676..9113cb75e 100644 --- a/src/Text/Pandoc/Readers/Markdown.hs +++ b/src/Text/Pandoc/Readers/Markdown.hs @@ -373,6 +373,7 @@ block = choice [ codeBlockFenced , abbrevKey , para , plain + , mempty <$ blanklines ] <?> "block" -- @@ -807,7 +808,7 @@ para = try $ do _ -> return $ B.para result' plain :: MarkdownParser (F Blocks) -plain = fmap B.plain . trimInlinesF . mconcat <$> many1 inline <* spaces +plain = fmap B.plain . trimInlinesF . mconcat <$> many1 inline -- -- raw html diff --git a/src/Text/Pandoc/Readers/RST.hs b/src/Text/Pandoc/Readers/RST.hs index c5e2617da..378e49703 100644 --- a/src/Text/Pandoc/Readers/RST.hs +++ b/src/Text/Pandoc/Readers/RST.hs @@ -143,6 +143,7 @@ block = choice [ codeBlock , list , lhsCodeBlock , para + , mempty <$ blanklines ] <?> "block" -- |