summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorJasper Van der Jeugt <jaspervdj@gmail.com>2011-02-26 15:49:46 +0100
committerJasper Van der Jeugt <jaspervdj@gmail.com>2011-02-26 15:49:46 +0100
commitaa3feb83f4119a971bf3e4c185a359e28f0ee73d (patch)
tree0fcf01d3ceb08ea5b163cd8748d1dc5d5ae7c7f6
parent5c454fc2ced8364e000f8c9cc36387e39e001714 (diff)
downloadhakyll-aa3feb83f4119a971bf3e4c185a359e28f0ee73d.tar.gz
Update hakyll.hs file of hakyll site
-rw-r--r--examples/hakyll/hakyll.hs20
1 files changed, 10 insertions, 10 deletions
diff --git a/examples/hakyll/hakyll.hs b/examples/hakyll/hakyll.hs
index 35f0ba4..c4f339c 100644
--- a/examples/hakyll/hakyll.hs
+++ b/examples/hakyll/hakyll.hs
@@ -7,34 +7,34 @@ import Text.Pandoc
main :: IO ()
main = hakyll $ do
route "css/*" idRoute
- compile "css/*" defaultCompressCss
+ compile "css/*" compressCssCompiler
-- Static directories
forM_ ["images/*", "examples/*", "reference/*"] $ \f -> do
route f idRoute
- compile f defaultCopyFile
+ compile f copyFileCompiler
-- Pages
forM_ pages $ \p -> do
route p $ setExtension "html"
- compile p $ defaultPageRead
+ compile p $ pageCompiler
>>> requireA "sidebar.markdown" (setFieldA "sidebar" $ arr pageBody)
- >>> defaultApplyTemplate "templates/default.html"
- >>> defaultRelativizeUrls
+ >>> applyTemplateCompiler "templates/default.html"
+ >>> relativizeUrlsCompiler
-- Tutorial
route "tutorial.markdown" $ setExtension "html"
- compile "tutorial.markdown" $ pageRead
+ compile "tutorial.markdown" $ readPageCompiler
>>> pageRenderPandocWith defaultHakyllParserState withToc
>>> requireA "sidebar.markdown" (setFieldA "sidebar" $ arr pageBody)
- >>> defaultApplyTemplate "templates/default.html"
- >>> defaultRelativizeUrls
+ >>> applyTemplateCompiler "templates/default.html"
+ >>> relativizeUrlsCompiler
-- Sidebar
- compile "sidebar.markdown" defaultPageRead
+ compile "sidebar.markdown" pageCompiler
-- Templates
- compile "templates/*" defaultTemplateRead
+ compile "templates/*" templateCompiler
where
withToc = defaultHakyllWriterOptions
{ writerTableOfContents = True