diff options
Diffstat (limited to 'src/Text/BlazeT/Renderer/Utf8.hs')
-rw-r--r-- | src/Text/BlazeT/Renderer/Utf8.hs | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/src/Text/BlazeT/Renderer/Utf8.hs b/src/Text/BlazeT/Renderer/Utf8.hs index 2874b68..3862a2b 100644 --- a/src/Text/BlazeT/Renderer/Utf8.hs +++ b/src/Text/BlazeT/Renderer/Utf8.hs | |||
@@ -22,20 +22,20 @@ import qualified Data.ByteString.Lazy as BL | |||
22 | import qualified Text.Blaze.Renderer.Utf8 as BU | 22 | import qualified Text.Blaze.Renderer.Utf8 as BU |
23 | import Text.BlazeT | 23 | import Text.BlazeT |
24 | 24 | ||
25 | renderMarkupBuilder :: MarkupM a -> B.Builder | 25 | renderMarkupBuilder :: MarkupI a -> B.Builder |
26 | renderMarkupBuilder = BU.renderMarkupBuilder . execMarkup | 26 | renderMarkupBuilder = BU.renderMarkupBuilder . execMarkup |
27 | 27 | ||
28 | renderHtmlBuilder :: MarkupM a -> B.Builder | 28 | renderHtmlBuilder :: MarkupI a -> B.Builder |
29 | renderHtmlBuilder = renderMarkupBuilder | 29 | renderHtmlBuilder = renderMarkupBuilder |
30 | 30 | ||
31 | renderMarkup :: MarkupM a -> BL.ByteString | 31 | renderMarkup :: MarkupI a -> BL.ByteString |
32 | renderMarkup = BU.renderMarkup . execMarkup | 32 | renderMarkup = BU.renderMarkup . execMarkup |
33 | 33 | ||
34 | renderHtml :: MarkupM a -> BL.ByteString | 34 | renderHtml :: MarkupI a -> BL.ByteString |
35 | renderHtml = renderMarkup | 35 | renderHtml = renderMarkup |
36 | 36 | ||
37 | renderMarkupToByteStringIO :: (BS.ByteString -> IO ()) -> MarkupM a -> IO () | 37 | renderMarkupToByteStringIO :: (BS.ByteString -> IO ()) -> MarkupI a -> IO () |
38 | renderMarkupToByteStringIO g = BU.renderMarkupToByteStringIO g . execMarkup | 38 | renderMarkupToByteStringIO g = BU.renderMarkupToByteStringIO g . execMarkup |
39 | 39 | ||
40 | renderHtmlToByteStringIO :: (BS.ByteString -> IO ()) -> MarkupM a -> IO () | 40 | renderHtmlToByteStringIO :: (BS.ByteString -> IO ()) -> MarkupI a -> IO () |
41 | renderHtmlToByteStringIO = renderMarkupToByteStringIO | 41 | renderHtmlToByteStringIO = renderMarkupToByteStringIO |