diff options
| author | Jasper Van der Jeugt <jaspervdj@gmail.com> | 2010-03-10 13:35:53 +0100 |
|---|---|---|
| committer | Jasper Van der Jeugt <jaspervdj@gmail.com> | 2010-03-10 13:35:53 +0100 |
| commit | fa28eac8a395da7e524dc50d910d10dc1fa76a12 (patch) | |
| tree | 6877c82a2853fa3cb565cd16c7744e4fdf5aa42c /src/Text/Hakyll/Internal | |
| parent | a028b35470dca724b4bc749275dc98fd4d71de51 (diff) | |
| download | hakyll-fa28eac8a395da7e524dc50d910d10dc1fa76a12.tar.gz | |
Renamed RenderAction to HakyllAction.
Diffstat (limited to 'src/Text/Hakyll/Internal')
| -rw-r--r-- | src/Text/Hakyll/Internal/Render.hs | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/src/Text/Hakyll/Internal/Render.hs b/src/Text/Hakyll/Internal/Render.hs index 28fc31b..178e6ff 100644 --- a/src/Text/Hakyll/Internal/Render.hs +++ b/src/Text/Hakyll/Internal/Render.hs @@ -14,7 +14,7 @@ import Data.Maybe (fromMaybe) import Text.Hakyll.Context (Context, ContextManipulation) import Text.Hakyll.File import Text.Hakyll.Hakyll -import Text.Hakyll.RenderAction +import Text.Hakyll.HakyllAction import Text.Hakyll.Internal.Template -- | A pure render function. @@ -31,8 +31,8 @@ pureRenderWith manipulation template context = -- | Write a page to the site destination. Final action after render -- chains and such. -writePage :: RenderAction Context () -writePage = createRenderAction $ \initialContext -> do +writePage :: HakyllAction Context () +writePage = createHakyllAction $ \initialContext -> do additionalContext' <- askHakyll getAdditionalContext let url = fromMaybe (error "No url defined at write time.") (M.lookup "url" initialContext) |
