@@ -7,34 +7,34 @@ import Text.Pandoc
77main :: IO ()
88main = hakyll $ do
99 route "css/*" idRoute
10− compile "css/*" defaultCompressCss
10+ compile "css/*" compressCssCompiler
1111
1212 -- Static directories
1313 forM_ ["images/*", "examples/*", "reference/*"] $ \f -> do
1414 route f idRoute
15− compile f defaultCopyFile
15+ compile f copyFileCompiler
1616
1717 -- Pages
1818 forM_ pages $ \p -> do
1919 route p $ setExtension "html"
20− compile p $ defaultPageRead
20+ compile p $ pageCompiler
2121 >>> requireA "sidebar.markdown" (setFieldA "sidebar" $ arr pageBody)
22− >>> defaultApplyTemplate "templates/default.html"
23− >>> defaultRelativizeUrls
22+ >>> applyTemplateCompiler "templates/default.html"
23+ >>> relativizeUrlsCompiler
2424
2525 -- Tutorial
2626 route "tutorial.markdown" $ setExtension "html"
27− compile "tutorial.markdown" $ pageRead
27+ compile "tutorial.markdown" $ readPageCompiler
2828 >>> pageRenderPandocWith defaultHakyllParserState withToc
2929 >>> requireA "sidebar.markdown" (setFieldA "sidebar" $ arr pageBody)
30− >>> defaultApplyTemplate "templates/default.html"
31− >>> defaultRelativizeUrls
30+ >>> applyTemplateCompiler "templates/default.html"
31+ >>> relativizeUrlsCompiler
3232
3333 -- Sidebar
34− compile "sidebar.markdown" defaultPageRead
34+ compile "sidebar.markdown" pageCompiler
3535
3636 -- Templates
37− compile "templates/*" defaultTemplateRead
37+ compile "templates/*" templateCompiler
3838 where
3939 withToc = defaultHakyllWriterOptions
4040 { writerTableOfContents = True