From cb7dd4469d420aea1a296079b7002aa5452fb481 Mon Sep 17 00:00:00 2001 From: John MacFarlane Date: Thu, 4 Jun 2015 10:23:38 +0200 Subject: HTML reader: allow `` to close ``. --- src/Text/Pandoc/Readers/HTML.hs | 1 + 1 file changed, 1 insertion(+) (limited to 'src/Text') diff --git a/src/Text/Pandoc/Readers/HTML.hs b/src/Text/Pandoc/Readers/HTML.hs index c766bb4ee..f2f97dbc4 100644 --- a/src/Text/Pandoc/Readers/HTML.hs +++ b/src/Text/Pandoc/Readers/HTML.hs @@ -854,6 +854,7 @@ isCommentTag = tagComment (const True) closes :: String -> String -> Bool _ `closes` "body" = False _ `closes` "html" = False +"body" `closes` "head" = True "a" `closes` "a" = True "li" `closes` "li" = True "th" `closes` t | t `elem` ["th","td"] = True -- cgit v1.2.3