summaryrefslogtreecommitdiff
path: root/examples/morepages/hakyll.hs
diff options
context:
space:
mode:
Diffstat (limited to 'examples/morepages/hakyll.hs')
-rw-r--r--examples/morepages/hakyll.hs29
1 files changed, 0 insertions, 29 deletions
diff --git a/examples/morepages/hakyll.hs b/examples/morepages/hakyll.hs
deleted file mode 100644
index c1b96e6..0000000
--- a/examples/morepages/hakyll.hs
+++ /dev/null
@@ -1,29 +0,0 @@
-{-# LANGUAGE OverloadedStrings, Arrows #-}
-module Main where
-
-import Control.Monad (forM_)
-import Control.Arrow (arr, (>>>))
-
-import Hakyll
-
-main :: IO ()
-main = hakyll $ do
- -- Compress CSS
- match "css/*" $ do
- route idRoute
- compile compressCssCompiler
-
- -- Render static pages
- forM_ ["about.markdown", "index.markdown", "products.markdown"] $ \p ->
- match p $ do
- route $ setExtension ".html"
- compile $ pageCompiler
- >>> requireA "footer.markdown" (setFieldA "footer" $ arr pageBody)
- >>> applyTemplateCompiler "templates/default.html"
- >>> relativizeUrlsCompiler
-
- -- Compile footer
- match "footer.markdown" $ compile pageCompiler
-
- -- Read templates
- match "templates/*" $ compile templateCompiler