[update HSX.XML to XMLType Jeremy Shaw **20121125175802 Ignore-this: 2b381c7af81a3267f8cdc011b889ebdd ] hunk ./TemplatesHSP.markdown.lhs 37 -> import qualified HSX.XMLGenerator as HSX hunk ./TemplatesHSP.markdown.lhs 201 -> bar :: (XMLGenerator m) => XMLGenT m (HSX.XML m) +> bar :: (XMLGenerator m) => XMLGenT m (XMLType m) hunk ./TemplatesHSP.markdown.lhs 211 -> import qualified HSX.XMLGenerator as HSX +> import qualified XMLTypeGenerator as HSX hunk ./TemplatesHSP.markdown.lhs 302 -> bar :: (XMLGenerator m) => XMLGenT m (HSX.XML m) +> bar :: (XMLGenerator m) => XMLGenT m (XMLType m) hunk ./TemplatesHSP.markdown.lhs 313 -> , SetAttr m (HSX.XML m) -> , AppendChild m (HSX.XML m) -> , EmbedAsChild m (HSX.XML m) -> , EmbedAsChild m [HSX.XML m] +> , SetAttr m (XMLType m) +> , AppendChild m (XMLType m) +> , EmbedAsChild m (XMLType m) +> , EmbedAsChild m [XMLType m] hunk ./TemplatesHSP.markdown.lhs 345 -> doBlock :: (XMLGenerator m) => XMLGenT m (HSX.XML m) +> doBlock :: (XMLGenerator m) => XMLGenT m (XMLType m) hunk ./TemplatesHSP.markdown.lhs 370 -> -> m (HSX.XML m) +> -> m (XMLType m) hunk ./TemplatesHSP.markdown.lhs 427 -> twoParagraphs :: (XMLGenerator m) => XMLGenT m [HSX.Child m] +> twoParagraphs :: (XMLGenerator m) => XMLGenT m [ChildType m] hunk ./TemplatesHSP.markdown.lhs 440 -> twoParagraphsWithParent :: (XMLGenerator m) => XMLGenT m (HSX.XML m) +> twoParagraphsWithParent :: (XMLGenerator m) => XMLGenT m (XMLType m) hunk ./TemplatesHSP.markdown.lhs 573 - instance [overlap ok] HSX.XMLGen m => EmbedAsChild m String - -- Defined in `HSX.XMLGenerator' + instance [overlap ok] XMLTypeGen m => EmbedAsChild m String + -- Defined in `XMLTypeGenerator' hunk ./TemplatesHSP.markdown.lhs 595 -> overlapping :: (EmbedAsChild m String) => XMLGenT m (HSX.XML m) +> overlapping :: (EmbedAsChild m String) => XMLGenT m (XMLType m) hunk ./TemplatesHSP.markdown.lhs 606 -> overlapping' :: (XMLGenerator m) => XMLGenT m (HSX.XML m) +> overlapping' :: (XMLGenerator m) => XMLGenT m (XMLType m) hunk ./TemplatesHSP.markdown.lhs 617 -> ambiguous :: (EmbedAsChild m String) => XMLGenT m (HSX.XML m) +> ambiguous :: (EmbedAsChild m String) => XMLGenT m (XMLType m) hunk ./TemplatesHSP.markdown.lhs 656 -> ambiguous :: (EmbedAsChild m Text) => XMLGenT m (HSX.XML m) +> ambiguous :: (EmbedAsChild m Text) => XMLGenT m (XMLType m) hunk ./TemplatesHSPI18n.markdown.lhs 61 -> import qualified HSX.XMLGenerator as HSX hunk ./TemplatesHSPI18n.markdown.lhs 113 -> helloPage :: (XMLGenerator m, EmbedAsChild m Text) => Text -> XMLGenT m (HSX.XML m) +> helloPage :: (XMLGenerator m, EmbedAsChild m Text) => Text -> XMLGenT m (XMLType m) hunk ./WebRoutesHSP.markdown.lhs 17 +> import Control.Monad (msum) +> import Data.Text (empty, pack) hunk ./WebRoutesHSP.markdown.lhs 21 -> import qualified HSX.XMLGenerator as HSX hunk ./WebRoutesHSP.markdown.lhs 45 -> monkeys n = +> monkeys n = hunk ./WebRoutesHSP.markdown.lhs 59 -> here +> here