Permalink
Browse files

Update brochure example code

  • Loading branch information...
1 parent ef22f11 commit 3956b4a423d5a1c01ed5154d6b3cbe7a1aaec774 @jaspervdj committed Jun 11, 2011
Showing with 5 additions and 7 deletions.
  1. +5 −7 brochure/hakyll.hs
  2. BIN hakyll/examples/brochure.zip
View
@@ -1,6 +1,5 @@
{-# LANGUAGE OverloadedStrings #-}
import Control.Arrow ((>>>))
-import Control.Monad (forM_)
import Hakyll
@@ -16,9 +15,8 @@ main = hakyll $ do
match "templates/*" $ compile templateCompiler
- forM_ ["about.rst", "index.markdown", "code.lhs"] $ \page ->
- match page $ do
- route $ setExtension "html"
- compile $ pageCompiler
- >>> applyTemplateCompiler "templates/default.html"
- >>> relativizeUrlsCompiler
+ match (list ["about.rst", "index.markdown", "code.lhs"]) $ do
+ route $ setExtension "html"
+ compile $ pageCompiler
+ >>> applyTemplateCompiler "templates/default.html"
+ >>> relativizeUrlsCompiler
Binary file not shown.

0 comments on commit 3956b4a

Please sign in to comment.