Make 'plain' RawBlocks work for 'plain' output.
commitdfd1796cf2940a151145f96265d75904b7313493
authorJohn MacFarlane <jgm@berkeley.edu>
dateThu 10 Jan 2019, 11:55 (8 years ago)
parent666bf8a
src/Text/Pandoc/Writers/Markdown.hs+5
@@ -472,6 +472,11 @@ blockToMarkdown' opts b@(RawBlock f str)
472472 return $ if plain
473473 then empty
474474 else text str <> text "\n"
475+ | f == "plain" = do
476+ plain <- asks envPlain
477+ return $ if plain
478+ then text str <> text "\n"
479+ else empty
475480 | otherwise = do
476481 report $ BlockNotRendered b
477482 return empty