summaryrefslogtreecommitdiff
path: root/src/Text/Hakyll/Render.hs
diff options
context:
space:
mode:
authorJasper Van der Jeugt <jaspervdj@gmail.com>2010-03-05 16:18:52 +0100
committerJasper Van der Jeugt <jaspervdj@gmail.com>2010-03-05 16:18:52 +0100
commit034c659b91e49f9b4d30cc731fe8972ab36a50ae (patch)
tree7573ffada81c4b9e854d5392e95655dea2874f1d /src/Text/Hakyll/Render.hs
parent45eb74655f60f9f5f13c6b6b52adada2265e80ee (diff)
downloadhakyll-034c659b91e49f9b4d30cc731fe8972ab36a50ae.tar.gz
Aliased `RenderAction () Context` to Renderable, custompages now have correct dependencies.
Diffstat (limited to 'src/Text/Hakyll/Render.hs')
-rw-r--r--src/Text/Hakyll/Render.hs8
1 files changed, 4 insertions, 4 deletions
diff --git a/src/Text/Hakyll/Render.hs b/src/Text/Hakyll/Render.hs
index 3c62fe2..9a95374 100644
--- a/src/Text/Hakyll/Render.hs
+++ b/src/Text/Hakyll/Render.hs
@@ -56,7 +56,7 @@ renderWith manipulation templatePath = RenderAction
-- * Concatenates the result.
--
renderAndConcat :: [FilePath] -- ^ Templates to apply on every renderable.
- -> [RenderAction () Context] -- ^ Renderables to render.
+ -> [Renderable] -- ^ Renderables to render.
-> RenderAction () String
renderAndConcat = renderAndConcatWith id
@@ -65,7 +65,7 @@ renderAndConcat = renderAndConcatWith id
-- apply on every @Renderable@.
renderAndConcatWith :: ContextManipulation
-> [FilePath]
- -> [RenderAction () Context]
+ -> [Renderable]
-> RenderAction () String
renderAndConcatWith manipulation templatePaths renderables = RenderAction
{ actionDependencies = renders >>= actionDependencies
@@ -91,14 +91,14 @@ renderAndConcatWith manipulation templatePaths renderables = RenderAction
--
-- This code will first render @warning.html@ using @templates/notice.html@,
-- and will then render the result with @templates/default.html@.
-renderChain :: [FilePath] -> RenderAction () Context -> Hakyll ()
+renderChain :: [FilePath] -> Renderable -> Hakyll ()
renderChain = renderChainWith id
-- | A more custom render chain that allows you to specify a
-- @ContextManipulation@ which to apply on the context when it is read first.
renderChainWith :: ContextManipulation
-> [FilePath]
- -> RenderAction () Context
+ -> Renderable
-> Hakyll ()
renderChainWith manipulation templatePaths initial =
runRenderActionIfNeeded renderChainWith'