瀏覽代碼

tag testing

john melesky 8 年之前
父節點
當前提交
b98ac81398
共有 1 個文件被更改,包括 2 次插入2 次删除
  1. 2 2
      site.hs

+ 2 - 2
site.hs

@@ -40,8 +40,8 @@ main = hakyll $ do
   match "posts/*" $ do
     route $ setExtension "html"
     compile $ pandocCompiler
-      >>= loadAndApplyTemplate "templates/post.html"    postCtxWithTags
-      >>= loadAndApplyTemplate "templates/default.html" postCtxWithTags
+      >>= loadAndApplyTemplate "templates/post.html"    (postCtxWithTags tags)
+      >>= loadAndApplyTemplate "templates/default.html" (postCtxWithTags tags)
       >>= relativizeUrls
 
   create ["archive.html"] $ do