From 6fad52b05724d5b1e2b877c0f600389faa6e6ac0 Mon Sep 17 00:00:00 2001 From: "Joseph C. Sible" Date: Tue, 5 May 2020 11:46:35 -0400 Subject: Avoid unnecessary guard (#6340) --- src/Text/Pandoc/Readers/HTML.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'src/Text/Pandoc/Readers') diff --git a/src/Text/Pandoc/Readers/HTML.hs b/src/Text/Pandoc/Readers/HTML.hs index a643ed41f..f85b24d3f 100644 --- a/src/Text/Pandoc/Readers/HTML.hs +++ b/src/Text/Pandoc/Readers/HTML.hs @@ -1161,7 +1161,7 @@ _ `closes` "meta" = True "object" `closes` "object" = True _ `closes` t | t `elem` ["option","style","script","textarea","title"] = True t `closes` "select" | t /= "option" = True -"thead" `closes` t | t `elem` ["colgroup"] = True +"thead" `closes` "colgroup" = True "tfoot" `closes` t | t `elem` ["thead","colgroup"] = True "tbody" `closes` t | t `elem` ["tbody","tfoot","thead","colgroup"] = True t `closes` t2 | -- cgit v1.2.3