Text.HTML.WraXML.Tree

Character decoding

findMetaEncoding :: (Tag name, Attribute name) => T i name String -> Maybe String

getMetaHTTPHeaders :: (Tag name, Attribute name) => T i name String -> [(String, String)]

Extract META tags which contain HTTP-EQUIV attribute and present these values like HTTP headers.

decodeAdaptive :: (Attribute name, Tag name) => (Encoding -> Encoded -> String) -> T i name [T] -> State (Encoded -> String) (T i name String)

Decode strings in a HTML tree. Switch decoding on every occurence of a content-type meta-tag. This must operate on HtmlStrings, that is before reference resolution, since after reference resolution Unicode characters may clash with encoded characters.

decodeLeafAdaptive :: (Attribute name, Tag name) => (Encoding -> Encoded -> String) -> Leaf name [T] -> State (Encoded -> String) (Leaf name String)

decodeSpecialCharsMetaEncoding :: (Tag name, Attribute name) => T i name T -> [T i name String]

Deprecated: This calls findMetaEncoding which is a potential space leak. Better use decodeAdaptive.

Convert special characters of XmlString into Unicode according to the encoding given in a META HTTP-EQUIV tag.

Formatting

formatMany :: (Tag name, Attribute name, C string) => [T i name string] -> ShowS

format :: (Tag name, Attribute name, C string) => T i name string -> ShowS

formatBranch :: (Tag name, Attribute name, C string) => Branch name string -> [ShowS] -> ShowS

formatManyXHTML :: (Tag name, Attribute name, C string) => [T i name string] -> ShowS

formatXHTML :: (Tag name, Attribute name, C string) => T i name string -> ShowS

formatBranchXHTML :: (Tag name, Attribute name, C string) => Branch name string -> [ShowS] -> ShowS

formatBranchGen :: (Tag name, Attribute name, C string) => Bool -> Branch name string -> [ShowS] -> ShowS

not xhtml: show br xhtml: show br/ Unfortunately we cannot generally merge tag/tag to tag/ since browsers expect e.g. separated div/div.