@@ -30,7 +30,7 @@ type AttrValue = Text
32 -- | An opening tag. Attribute ordering is arbitrary
32 -- | An opening tag. Attribute ordering is arbitrary
33− = TagOpen !TagName ![Attr]
33+ = TagOpen !TagName [Attr]
34 -- | A closing tag.
34 -- | A closing tag.
35 | TagClose !TagName
35 | TagClose !TagName
36 -- | A text between tags.
36 -- | A text between tags.