Following the compiler advices
-{-# LANGUAGE RankNTypes #-}
+{-# LANGUAGE MonoLocalBinds #-}
+{-# LANGUAGE RankNTypes #-}
module Text.BlazeT.Html
(
module Text.BlazeT
, preEscapedToHtml
) where
-import Text.BlazeT
+import Text.BlazeT
type HtmlT = MarkupT
type HtmlM a = MarkupM a
type Html = Markup
-toHtml ::(ToMarkup a) => a -> Html
+toHtml :: (ToMarkup a) => a -> Html
toHtml = toMarkup
-preEscapedToHtml ::(ToMarkup a) => a -> Html
+preEscapedToHtml :: (ToMarkup a) => a -> Html
preEscapedToHtml = preEscapedToMarkup
-- $descr1 The following is an adaptation of all "Text.Blaze.Html"