diff options
author | Jasper Van der Jeugt <jaspervdj@gmail.com> | 2011-02-26 15:49:46 +0100 |
---|---|---|
committer | Jasper Van der Jeugt <jaspervdj@gmail.com> | 2011-02-26 15:49:46 +0100 |
commit | aa3feb83f4119a971bf3e4c185a359e28f0ee73d (patch) | |
tree | 0fcf01d3ceb08ea5b163cd8748d1dc5d5ae7c7f6 | |
parent | 5c454fc2ced8364e000f8c9cc36387e39e001714 (diff) | |
download | hakyll-aa3feb83f4119a971bf3e4c185a359e28f0ee73d.tar.gz |
Update hakyll.hs file of hakyll site
-rw-r--r-- | examples/hakyll/hakyll.hs | 20 |
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 |