8 import Text.XML.HXT.Core (
21 to_xhtml :: a -> String
25 -- | Options used when parsing HTML.
26 my_read_opts :: SysConfigList
27 my_read_opts = [ withValidate no,
31 -- | My version of HandsomeSoup's parseHTML.
32 parse_lwn :: String -> IOStateArrow s b XmlTree
33 parse_lwn = readString my_read_opts