-- Hoogle documentation, generated by Haddock
-- See Hoogle, http://www.haskell.org/hoogle/


-- | A library for writing XML and HTML
--   
--   A way to write XML and HTML with more efficient syntax.
@package XmlHtmlWriter
@version 0.0.0.1


-- | The xml writer.
module Language.XmlHtml.XmlWriter
void :: Monad m => m a -> m ()
newtype HtmlWriter a
HtmlWriter :: WriterT String IO a -> HtmlWriter a
getHtml :: HtmlWriter a -> WriterT String IO a
liftIO :: IO a -> HtmlWriter a

-- | <tt><a>writeString</a> s</tt> writes a string to the html writer monad
writeString :: MonadWriter w m => w -> m ()

-- | <tt><tt>makeHtml</tt> s</tt> currently just converts this into a
--   string
makeXml :: Printable a b => a -> IO String
data End
data Par
data Param a b
Param :: [HtmlAttr] -> a -> Param a b
data Elem a b
Elem :: String -> a -> Elem a b
data HtmlAttr
Attr :: String -> String -> HtmlAttr
class Printable a b | a -> b
printThis :: Printable a b => a -> HtmlWriter ()
showMiddle :: Show a => [a] -> [Char]
tag :: (Printable a b1, Printable (Elem a b1) b) => String -> a -> HtmlWriter ()
instance Monad HtmlWriter
instance MonadWriter String HtmlWriter
instance Printable a End => Printable (Param a End) Par
instance Printable a Par => Printable (Param a Par) Par
instance Printable a End => Printable (Elem a End) End
instance Printable a Par => Printable (Elem a Par) End
instance Printable (HtmlWriter a) End
instance Printable [Char] End
instance Show HtmlAttr


-- | Some tags for writing html in a pretty format in haskell.
module Language.XmlHtml.HtmlTags
link :: (Show a1, Printable a b2, Printable (Param a b2) b1, Printable (Elem (Param a b2) b1) b) => a1 -> [HtmlAttr] -> a -> HtmlWriter ()
href :: (Show a1, Printable a b) => a1 -> a -> Param a b
name :: (Show a1, Printable a b) => a1 -> a -> Param a b
address :: (Printable (Elem a b1) b, Printable a b1) => a -> HtmlWriter ()
anchor :: (Printable (Elem a b1) b, Printable a b1) => a -> HtmlWriter ()
applet :: (Printable (Elem a b1) b, Printable a b1) => a -> HtmlWriter ()
big :: (Printable (Elem a b1) b, Printable a b1) => a -> HtmlWriter ()
blockquote :: (Printable (Elem a b1) b, Printable a b1) => a -> HtmlWriter ()
body :: (Printable (Elem a b1) b, Printable a b1) => a -> HtmlWriter ()
bold :: (Printable (Elem a b1) b, Printable a b1) => a -> HtmlWriter ()
caption :: (Printable (Elem a b1) b, Printable a b1) => a -> HtmlWriter ()
center :: (Printable (Elem a b1) b, Printable a b1) => a -> HtmlWriter ()
cite :: (Printable (Elem a b1) b, Printable a b1) => a -> HtmlWriter ()
ddef :: (Printable (Elem a b1) b, Printable a b1) => a -> HtmlWriter ()
define :: (Printable (Elem a b1) b, Printable a b1) => a -> HtmlWriter ()
dlist :: (Printable (Elem a b1) b, Printable a b1) => a -> HtmlWriter ()
dterm :: (Printable (Elem a b1) b, Printable a b1) => a -> HtmlWriter ()
emphasize :: (Printable (Elem a b1) b, Printable a b1) => a -> HtmlWriter ()
fieldset :: (Printable (Elem a b1) b, Printable a b1) => a -> HtmlWriter ()
font :: (Printable (Elem a b1) b, Printable a b1) => a -> HtmlWriter ()
form :: (Printable (Elem a b1) b, Printable a b1) => a -> HtmlWriter ()
frame :: (Printable (Elem a b1) b, Printable a b1) => a -> HtmlWriter ()
frameset :: (Printable (Elem a b1) b, Printable a b1) => a -> HtmlWriter ()
h1 :: (Printable (Elem a b1) b, Printable a b1) => a -> HtmlWriter ()
h2 :: (Printable (Elem a b1) b, Printable a b1) => a -> HtmlWriter ()
h3 :: (Printable (Elem a b1) b, Printable a b1) => a -> HtmlWriter ()
h4 :: (Printable (Elem a b1) b, Printable a b1) => a -> HtmlWriter ()
h5 :: (Printable (Elem a b1) b, Printable a b1) => a -> HtmlWriter ()
h6 :: (Printable (Elem a b1) b, Printable a b1) => a -> HtmlWriter ()
header :: (Printable (Elem a b1) b, Printable a b1) => a -> HtmlWriter ()
html :: (Printable (Elem a b1) b, Printable a b1) => a -> HtmlWriter ()
h_code :: (Printable (Elem a b1) b, Printable a b1) => a -> HtmlWriter ()
h_div :: (Printable (Elem a b1) b, Printable a b1) => a -> HtmlWriter ()
h_link :: (Printable (Elem a b1) b, Printable a b1) => a -> HtmlWriter ()
h_map :: (Printable (Elem a b1) b, Printable a b1) => a -> HtmlWriter ()
h_span :: (Printable (Elem a b1) b, Printable a b1) => a -> HtmlWriter ()
h_title :: (Printable (Elem a b1) b, Printable a b1) => a -> HtmlWriter ()
italics :: (Printable (Elem a b1) b, Printable a b1) => a -> HtmlWriter ()
keyboard :: (Printable (Elem a b1) b, Printable a b1) => a -> HtmlWriter ()
legend :: (Printable (Elem a b1) b, Printable a b1) => a -> HtmlWriter ()
li :: (Printable (Elem a b1) b, Printable a b1) => a -> HtmlWriter ()
noframes :: (Printable (Elem a b1) b, Printable a b1) => a -> HtmlWriter ()
olist :: (Printable (Elem a b1) b, Printable a b1) => a -> HtmlWriter ()
option :: (Printable (Elem a b1) b, Printable a b1) => a -> HtmlWriter ()
p :: (Printable (Elem a b1) b, Printable a b1) => a -> HtmlWriter ()
pre :: (Printable (Elem a b1) b, Printable a b1) => a -> HtmlWriter ()
sample :: (Printable (Elem a b1) b, Printable a b1) => a -> HtmlWriter ()
select :: (Printable (Elem a b1) b, Printable a b1) => a -> HtmlWriter ()
small :: (Printable (Elem a b1) b, Printable a b1) => a -> HtmlWriter ()
strong :: (Printable (Elem a b1) b, Printable a b1) => a -> HtmlWriter ()
style :: (Printable (Elem a b1) b, Printable a b1) => a -> HtmlWriter ()
sub :: (Printable (Elem a b1) b, Printable a b1) => a -> HtmlWriter ()
sup :: (Printable (Elem a b1) b, Printable a b1) => a -> HtmlWriter ()
table :: (Printable (Elem a b1) b, Printable a b1) => a -> HtmlWriter ()
td :: (Printable (Elem a b1) b, Printable a b1) => a -> HtmlWriter ()
textarea :: (Printable (Elem a b1) b, Printable a b1) => a -> HtmlWriter ()
th :: (Printable (Elem a b1) b, Printable a b1) => a -> HtmlWriter ()
tr :: (Printable (Elem a b1) b, Printable a b1) => a -> HtmlWriter ()
tt :: (Printable (Elem a b1) b, Printable a b1) => a -> HtmlWriter ()
ulist :: (Printable (Elem a b1) b, Printable a b1) => a -> HtmlWriter ()
underline :: (Printable (Elem a b1) b, Printable a b1) => a -> HtmlWriter ()
variable :: (Printable (Elem a b1) b, Printable a b1) => a -> HtmlWriter ()