diff options
-rw-r--r-- | src/Text/Pandoc/Readers/Markdown.hs | 2 | ||||
-rw-r--r-- | test/command/3947.md | 11 |
2 files changed, 12 insertions, 1 deletions
diff --git a/src/Text/Pandoc/Readers/Markdown.hs b/src/Text/Pandoc/Readers/Markdown.hs index 1364f25cb..61c07ed12 100644 --- a/src/Text/Pandoc/Readers/Markdown.hs +++ b/src/Text/Pandoc/Readers/Markdown.hs @@ -1101,7 +1101,7 @@ rawTeXBlock = do <|> (B.rawBlock "latex" . concat <$> rawLaTeXBlock `sepEndBy1` blankline) - spaces + optional blanklines return $ return result rawHtmlBlocks :: PandocMonad m => MarkdownParser m (F Blocks) diff --git a/test/command/3947.md b/test/command/3947.md new file mode 100644 index 000000000..7ce0be171 --- /dev/null +++ b/test/command/3947.md @@ -0,0 +1,11 @@ +``` +% pandoc -t native +\newpage + + Code block + + Another Code block +^D +[RawBlock (Format "latex") "\\newpage" +,CodeBlock ("",[],[]) "Code block\n\nAnother Code block"] +``` |