aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--src/Text/Pandoc/Readers/Markdown.hs2
-rw-r--r--test/command/3947.md11
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"]
+```