diff options
| author | Jasper Van der Jeugt <jaspervdj@gmail.com> | 2009-12-04 18:32:56 +0100 |
|---|---|---|
| committer | Jasper Van der Jeugt <jaspervdj@gmail.com> | 2009-12-04 18:32:56 +0100 |
| commit | 08b2fe3eb44e1afc45e11cc76819ca62ba331baf (patch) | |
| tree | 7df86efac6912af3252d69d7e5bec773920591db /src/Text/Hakyll/Render.hs | |
| parent | cf5aaee05169c96f79b719a721af411edbb18449 (diff) | |
| download | hakyll-08b2fe3eb44e1afc45e11cc76819ca62ba331baf.tar.gz | |
Added simple caching.
Diffstat (limited to 'src/Text/Hakyll/Render.hs')
| -rw-r--r-- | src/Text/Hakyll/Render.hs | 4 |
1 files changed, 0 insertions, 4 deletions
diff --git a/src/Text/Hakyll/Render.hs b/src/Text/Hakyll/Render.hs index 2d09d42..a69d27d 100644 --- a/src/Text/Hakyll/Render.hs +++ b/src/Text/Hakyll/Render.hs @@ -10,16 +10,12 @@ import qualified Data.ByteString.Lazy.Char8 as B import qualified Data.Map as M import Control.Monad -import System.FilePath import System.Directory import System.IO import Text.Hakyll.Page import Text.Hakyll.Util -toDestination :: FilePath -> FilePath -toDestination path = "_site" </> path - createContext :: Page -> Context createContext = M.fromList . map packPair . M.toList where packPair (a, b) = (B.pack a, b) |