examples/hakyll/hakyll.hs


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19

import Text.Hakyll
import Text.Hakyll.Render
import Text.Hakyll.Renderables
import Text.Hakyll.File

import Control.Monad(mapM_)

main = hakyll $ do
    directory css "css"
    directory static "images"
    directory static "examples"

    mapM_ render' [ "about.markdown"
                  , "index.markdown"
                  , "tutorial1.markdown"
                  , "tutorial2.markdown"
                  ]

    where render' = renderChain ["templates/default.html"] . createPagePath