pumpkin/pumpkin.hs

module Main where

import Hakyll

main :: IO ()
main =
  hakyll $
  do match "res/favicon.ico" $
       do route (gsubRoute "res/" (const ""))
          compile copyFileCompiler
     match "res/bootstrap.css" $
       do route idRoute
          compile compressCssCompiler
     match "pages/*" $
       do route (composeRoutes (setExtension "html")
                               (gsubRoute "pages/" (const "")))
          compile $
            pandocCompiler >>=
            loadAndApplyTemplate "tpl/default.tpl" defaultContext >>=
            relativizeUrls