diff options
author | John MacFarlane <jgm@berkeley.edu> | 2018-03-02 19:35:22 -0800 |
---|---|---|
committer | John MacFarlane <jgm@berkeley.edu> | 2018-03-02 19:35:22 -0800 |
commit | 987140eadc0af868af55d6ac52414382eb1f855c (patch) | |
tree | 9b58508d10a626553ea1e222acd56cf8ea573ce7 /src | |
parent | 6dd21250288b51f10056b15a83130f76c788d904 (diff) | |
download | pandoc-987140eadc0af868af55d6ac52414382eb1f855c.tar.gz |
Revert "Commonmark reader: parse HTML as plain text if `-raw_html`."
This reverts commit 6dd21250288b51f10056b15a83130f76c788d904.
Diffstat (limited to 'src')
-rw-r--r-- | src/Text/Pandoc/Readers/CommonMark.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/Text/Pandoc/Readers/CommonMark.hs b/src/Text/Pandoc/Readers/CommonMark.hs index e5b8775c1..6fbc09c17 100644 --- a/src/Text/Pandoc/Readers/CommonMark.hs +++ b/src/Text/Pandoc/Readers/CommonMark.hs @@ -109,7 +109,7 @@ addBlock opts (Node _ BLOCK_QUOTE nodes) = (BlockQuote (addBlocks opts nodes) :) addBlock opts (Node _ (HTML_BLOCK t) _) | isEnabled Ext_raw_html opts = (RawBlock (Format "html") (unpack t) :) - | otherwise = (Para [Str (unpack t)] :) + | otherwise = id -- Note: the cmark parser will never generate CUSTOM_BLOCK, -- so we don't need to handle it: addBlock _ (Node _ (CUSTOM_BLOCK _onEnter _onExit) _nodes) = @@ -215,7 +215,7 @@ addInline opts (Node _ SOFTBREAK _) | otherwise = (SoftBreak :) addInline opts (Node _ (HTML_INLINE t) _) | isEnabled Ext_raw_html opts = (RawInline (Format "html") (unpack t) :) - | otherwise = (Str (unpack t) :) + | otherwise = id -- Note: the cmark parser will never generate CUSTOM_BLOCK, -- so we don't need to handle it: addInline _ (Node _ (CUSTOM_INLINE _onEnter _onExit) _nodes) = |