From 13538ce6eb1e8bf60d556bdfe551f75a89c8bf3d Mon Sep 17 00:00:00 2001 From: quasicomputational Date: Thu, 5 Apr 2018 16:53:42 +0100 Subject: CommonMark writer: correctly ignore LaTeX raw blocks when not raw_tex (#4533) Issue #4527. --- src/Text/Pandoc/Writers/CommonMark.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'src/Text/Pandoc') diff --git a/src/Text/Pandoc/Writers/CommonMark.hs b/src/Text/Pandoc/Writers/CommonMark.hs index 50224a715..98c1101fa 100644 --- a/src/Text/Pandoc/Writers/CommonMark.hs +++ b/src/Text/Pandoc/Writers/CommonMark.hs @@ -116,7 +116,7 @@ blockToNodes _ (CodeBlock (_,classes,_) xs) ns = return blockToNodes opts (RawBlock fmt xs) ns | fmt == Format "html" && isEnabled Ext_raw_html opts = return (node (HTML_BLOCK (T.pack xs)) [] : ns) - | fmt == Format "latex" || fmt == Format "tex" && isEnabled Ext_raw_tex opts + | (fmt == Format "latex" || fmt == Format "tex") && isEnabled Ext_raw_tex opts = return (node (CUSTOM_BLOCK (T.pack xs) T.empty) [] : ns) | otherwise = return ns blockToNodes opts (BlockQuote bs) ns = do -- cgit v1.2.3