hakyll/examples/morepages/hakyll.hs

14 lines
471 B
Haskell
Raw Normal View History

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