diff --git a/src/Main.hs b/src/Main.hs index 61a4b41..2c87983 100644 --- a/src/Main.hs +++ b/src/Main.hs @@ -40,7 +40,7 @@ main = tags <- buildTags "site/posts/*.md" (fromCapture "tags/*.html") --build tagcloud - let baseCtx = tagCloudField "tags" 100 100 tags <> + let baseCtx = tagCloudField "tagCloud" 100 100 tags <> defaultContext match "site/index.md" $ do @@ -88,7 +88,7 @@ main = let pageCtx = paginateContext pages num let flattrCtx = constField "enctitle" (urlEncode title) <> constField "encurl" (urlEncode $ "https://nek0.eu/" ++ url) - let ctx = (postCtx tags) <> pageCtx <> flattrCtx + let ctx = (postCtx tags) <> pageCtx <> flattrCtx <> baseCtx full <- loadAndApplyTemplate "templates/post.html" ctx compiled _ <- saveSnapshot "content" compiled loadAndApplyTemplate "templates/default.html" (baseCtx <> ctx) full