module Text.Hamlet
(
hamlet
, xhamlet
, hamlet'
, xhamlet'
, hamletDebug
, hamletFile
, xhamletFile
, hamletWithSettings
, hamletFileWithSettings
, HamletSettings (..)
, defaultHamletSettings
, xhtmlHamletSettings
, Html
, Hamlet
, renderHamlet
, renderHtml
, preEscapedString
, string
, unsafeByteString
, cdata
, HamletRT
, HamletData (..)
, HamletException (..)
, parseHamletRT
, renderHamletRT
) where
import Text.Hamlet.Parse
import Text.Hamlet.Quasi
import Text.Hamlet.RT
import Text.Blaze
import qualified Data.ByteString.Lazy as L
import Data.Monoid (mappend)
type Hamlet url = (url -> String) -> Html ()
renderHamlet :: (url -> String) -> Hamlet url -> L.ByteString
renderHamlet render h = renderHtml $ h render
cdata :: Html () -> Html ()
cdata h =
preEscapedString "<![CDATA["
`mappend`
h
`mappend`
preEscapedString "]]>"