git.iko.soy/typeable/pandoc
on master help sign in
Markdown reader: Combine consecutive latex environments.
e03ed73John MacFarlane
src/Text/Pandoc/Readers/Markdown.hs+4−2
@@ -939,8 +939,10 @@ rawVerbatimBlock = try $ do
939rawTeXBlock :: MarkdownParser (F Blocks)
939rawTeXBlock :: MarkdownParser (F Blocks)
940rawTeXBlock = do
940rawTeXBlock = do
941 guardEnabled Ext_raw_tex
941 guardEnabled Ext_raw_tex
942− result <- (B.rawBlock "latex" <$> rawLaTeXBlock)
942+ result <- (B.rawBlock "latex" . concat <$>
943+ rawLaTeXBlock `sepEndBy1` blankline)
944+ <|> (B.rawBlock "context" . concat <$>
943− <|> (B.rawBlock "context" <$> rawConTeXtEnvironment)
945+ rawConTeXtEnvironment `sepEndBy1` blankline)
944 spaces
946 spaces
945 return $ return result
947 return $ return result
946
948