From fa28eac8a395da7e524dc50d910d10dc1fa76a12 Mon Sep 17 00:00:00 2001 From: Jasper Van der Jeugt Date: Wed, 10 Mar 2010 13:35:53 +0100 Subject: Renamed RenderAction to HakyllAction. --- src/Text/Hakyll/Internal/Render.hs | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) (limited to 'src/Text/Hakyll/Internal') 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) -- cgit v1.2.3