hakyll/examples/morepages/hakyll.hs
Jasper Van der Jeugt e0504b0de2 Updated tutorial 3.
2010-03-11 21:28:52 +01:00

13 lines
471 B
Haskell

import Text.Hakyll (hakyll)
import Text.Hakyll.File (directory)
import Text.Hakyll.Render (css, static, renderChain)
import Text.Hakyll.CreateContext (createPage, combine)
main = hakyll "http://example.com" $ do
directory css "css"
render "about.markdown"
render "index.markdown"
render "products.markdown"
where
render = renderChain ["templates/default.html"] . withFooter . createPage
withFooter = flip combine $ createPage "footer.markdown"