sercanto/mcwhirter.io
1
0
Fork 0
Code Issues Pull requests Packages Projects Releases Wiki Activity

Removed cruft

Browse source
This commit is contained in:
Craige McWhirter 2020-08-08 13:38:46 +10:00
parent 5875ff5d9f
commit 09106a8487
Signed by: sercanto
GPG key ID: 7DBA9F5689EFB6AA
1 changed files with 0 additions and 15 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

15
site.hs
View file

@ -28,21 +28,6 @@ main = hakyll $ do
>>= loadAndApplyTemplate "templates/default.html" postCtx >>= loadAndApplyTemplate "templates/default.html" postCtx
>>= relativizeUrls >>= relativizeUrls
create ["archive.html"] $ do
route idRoute
compile $ do
posts <- recentFirst =<< loadAll "posts/*"
let archiveCtx =
listField "posts" postCtx (return posts) `mappend`
constField "title" "Archives" `mappend`
defaultContext
makeItem ""
>>= loadAndApplyTemplate "templates/archive.html" archiveCtx
>>= loadAndApplyTemplate "templates/default.html" archiveCtx
>>= relativizeUrls
match "index.rst" $ do match "index.rst" $ do
route $ setExtension "html" route $ setExtension "html"
compile $ do compile $ do