@@ -909,6 +909,7 @@ pCloses tagtype = try $ do
909909 (TagClose "ol") | tagtype == "li" -> return ()
910910 (TagClose "dl") | tagtype == "dd" -> return ()
911911 (TagClose "table") | tagtype == "td" -> return ()
912+ (TagClose "table") | tagtype == "th" -> return ()
912913 (TagClose "table") | tagtype == "tr" -> return ()
913914 (TagClose "td") | tagtype `Set.member` blockHtmlTags -> return ()
914915 (TagClose "th") | tagtype `Set.member` blockHtmlTags -> return ()