aboutsummaryrefslogtreecommitdiffhomepage
path: root/src/Text/BlazeT/Renderer
diff options
context:
space:
mode:
Diffstat (limited to 'src/Text/BlazeT/Renderer')
-rw-r--r--src/Text/BlazeT/Renderer/Pretty.hs4
-rw-r--r--src/Text/BlazeT/Renderer/String.hs4
-rw-r--r--src/Text/BlazeT/Renderer/Text.hs16
-rw-r--r--src/Text/BlazeT/Renderer/Utf8.hs12
4 files changed, 18 insertions, 18 deletions
diff --git a/src/Text/BlazeT/Renderer/Pretty.hs b/src/Text/BlazeT/Renderer/Pretty.hs
index 5e033ac..4fc77b7 100644
--- a/src/Text/BlazeT/Renderer/Pretty.hs
+++ b/src/Text/BlazeT/Renderer/Pretty.hs
@@ -7,9 +7,9 @@ module Text.BlazeT.Renderer.Pretty
7import qualified Text.Blaze.Renderer.Pretty as BU 7import qualified Text.Blaze.Renderer.Pretty as BU
8import Text.BlazeT 8import Text.BlazeT
9 9
10renderMarkup :: MarkupM a -> String 10renderMarkup :: MarkupI a -> String
11renderMarkup = BU.renderMarkup . execMarkup 11renderMarkup = BU.renderMarkup . execMarkup
12 12
13renderHtml :: MarkupM a -> String 13renderHtml :: MarkupI a -> String
14renderHtml = renderMarkup 14renderHtml = renderMarkup
15 15
diff --git a/src/Text/BlazeT/Renderer/String.hs b/src/Text/BlazeT/Renderer/String.hs
index 45c4786..615abbc 100644
--- a/src/Text/BlazeT/Renderer/String.hs
+++ b/src/Text/BlazeT/Renderer/String.hs
@@ -12,9 +12,9 @@ import Text.BlazeT
12fromChoiceString :: ChoiceString -> String -> String 12fromChoiceString :: ChoiceString -> String -> String
13fromChoiceString = BU.fromChoiceString 13fromChoiceString = BU.fromChoiceString
14 14
15renderMarkup :: MarkupM a -> String 15renderMarkup :: MarkupI a -> String
16renderMarkup = BU.renderMarkup . execMarkup 16renderMarkup = BU.renderMarkup . execMarkup
17 17
18renderHtml :: MarkupM a -> String 18renderHtml :: MarkupI a -> String
19renderHtml = renderMarkup 19renderHtml = renderMarkup
20 20
diff --git a/src/Text/BlazeT/Renderer/Text.hs b/src/Text/BlazeT/Renderer/Text.hs
index a595bd1..5e5583c 100644
--- a/src/Text/BlazeT/Renderer/Text.hs
+++ b/src/Text/BlazeT/Renderer/Text.hs
@@ -18,27 +18,27 @@ import qualified Text.Blaze.Html.Renderer.Text as BH
18import qualified Text.Blaze.Renderer.Text as BU 18import qualified Text.Blaze.Renderer.Text as BU
19import Text.BlazeT 19import Text.BlazeT
20 20
21renderMarkupBuilder :: MarkupM a -> B.Builder 21renderMarkupBuilder :: MarkupI a -> B.Builder
22renderMarkupBuilder = BU.renderMarkupBuilder . execMarkup 22renderMarkupBuilder = BU.renderMarkupBuilder . execMarkup
23 23
24renderHtmlBuilder :: MarkupM a -> B.Builder 24renderHtmlBuilder :: MarkupI a -> B.Builder
25renderHtmlBuilder = renderMarkupBuilder 25renderHtmlBuilder = renderMarkupBuilder
26 26
27renderMarkup :: MarkupM a -> L.Text 27renderMarkup :: MarkupI a -> L.Text
28renderMarkup = BU.renderMarkup . execMarkup 28renderMarkup = BU.renderMarkup . execMarkup
29 29
30renderHtml :: MarkupM a -> L.Text 30renderHtml :: MarkupI a -> L.Text
31renderHtml = renderMarkup 31renderHtml = renderMarkup
32 32
33renderMarkupWith :: (ByteString -> Text) -> MarkupM a -> L.Text 33renderMarkupWith :: (ByteString -> Text) -> MarkupI a -> L.Text
34renderMarkupWith g = (BH.renderHtmlWith g) . execMarkup 34renderMarkupWith g = (BH.renderHtmlWith g) . execMarkup
35 35
36renderHtmlWith :: (ByteString -> Text) -> MarkupM a -> L.Text 36renderHtmlWith :: (ByteString -> Text) -> MarkupI a -> L.Text
37renderHtmlWith = renderMarkupWith 37renderHtmlWith = renderMarkupWith
38 38
39renderMarkupBuilderWith :: (ByteString -> Text) -> MarkupM a -> B.Builder 39renderMarkupBuilderWith :: (ByteString -> Text) -> MarkupI a -> B.Builder
40renderMarkupBuilderWith g = (BU.renderMarkupBuilderWith g) . execMarkup 40renderMarkupBuilderWith g = (BU.renderMarkupBuilderWith g) . execMarkup
41 41
42renderHtmlBuilderWith :: (ByteString -> Text) -> MarkupM a -> B.Builder 42renderHtmlBuilderWith :: (ByteString -> Text) -> MarkupI a -> B.Builder
43renderHtmlBuilderWith = renderHtmlBuilderWith 43renderHtmlBuilderWith = renderHtmlBuilderWith
44 44
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
22import qualified Text.Blaze.Renderer.Utf8 as BU 22import qualified Text.Blaze.Renderer.Utf8 as BU
23import Text.BlazeT 23import Text.BlazeT
24 24
25renderMarkupBuilder :: MarkupM a -> B.Builder 25renderMarkupBuilder :: MarkupI a -> B.Builder
26renderMarkupBuilder = BU.renderMarkupBuilder . execMarkup 26renderMarkupBuilder = BU.renderMarkupBuilder . execMarkup
27 27
28renderHtmlBuilder :: MarkupM a -> B.Builder 28renderHtmlBuilder :: MarkupI a -> B.Builder
29renderHtmlBuilder = renderMarkupBuilder 29renderHtmlBuilder = renderMarkupBuilder
30 30
31renderMarkup :: MarkupM a -> BL.ByteString 31renderMarkup :: MarkupI a -> BL.ByteString
32renderMarkup = BU.renderMarkup . execMarkup 32renderMarkup = BU.renderMarkup . execMarkup
33 33
34renderHtml :: MarkupM a -> BL.ByteString 34renderHtml :: MarkupI a -> BL.ByteString
35renderHtml = renderMarkup 35renderHtml = renderMarkup
36 36
37renderMarkupToByteStringIO :: (BS.ByteString -> IO ()) -> MarkupM a -> IO () 37renderMarkupToByteStringIO :: (BS.ByteString -> IO ()) -> MarkupI a -> IO ()
38renderMarkupToByteStringIO g = BU.renderMarkupToByteStringIO g . execMarkup 38renderMarkupToByteStringIO g = BU.renderMarkupToByteStringIO g . execMarkup
39 39
40renderHtmlToByteStringIO :: (BS.ByteString -> IO ()) -> MarkupM a -> IO () 40renderHtmlToByteStringIO :: (BS.ByteString -> IO ()) -> MarkupI a -> IO ()
41renderHtmlToByteStringIO = renderMarkupToByteStringIO 41renderHtmlToByteStringIO = renderMarkupToByteStringIO