git.iko.soy/typeable/html-parse
on master help sign in
update nonClosing to contain complete list of void elements.
1402a60Jeremy Shaw
Text/HTML/Tree.hs+1−1
compare with master
unifiedsplit
@@ -34,7 +34,7 @@ tokensToForest = f (PStack [] [])
34 Doctype _ -> f (pushFlatSibling t pstack) ts
34 Doctype _ -> f (pushFlatSibling t pstack) ts
35
35
36nonClosing :: [Text]
36nonClosing :: [Text]
37−nonClosing = ["br", "hr", "img"]
37+nonClosing = ["br", "hr", "img", "meta", "area", "base", "col", "command", "embed", "input", "keygen", "link", "param", "source", "track", "wbr"]
38
38
39data ParseTokenForestError =
39data ParseTokenForestError =
40 ParseTokenForestErrorBracketMismatch PStack (Maybe Token)
40 ParseTokenForestErrorBracketMismatch PStack (Maybe Token)