summaryrefslogtreecommitdiffstats
path: root/hakyll.hs
diff options
context:
space:
mode:
Diffstat (limited to 'hakyll.hs')
-rw-r--r--hakyll.hs6
1 files changed, 3 insertions, 3 deletions
diff --git a/hakyll.hs b/hakyll.hs
index f5e1045..9ec9225 100644
--- a/hakyll.hs
+++ b/hakyll.hs
@@ -51,7 +51,7 @@ main = hakyll $ do
>>> ((constA () &&& constA "index*") &&& id)
>>> paginatePosts (const "Home")
- match "posts/*" $ compile $ readPageCompiler
+ match "posts/*" $ compile $ pageCompiler
>>> (id &&& getIdentifier)
>>> setFieldA "path" (arr $ fromMaybe "" . runRoutes (setExtension ".html"))
>>> (id &&& arr (getField "path"))
@@ -104,10 +104,10 @@ main = hakyll $ do
nav prev next = navPrev prev ++ navNext next
navPrev Nothing = "<span class=\"newer\">&nbsp;</span>"
- navPrev (Just url) = "<span class=\"newer\"><a href=\"" ++ url ++ "\" >&laquo; Newer Entries</a></span>"
+ navPrev (Just url) = "<span class=\"newer\"><a href=\"" ++ url ++ "\" rel=\"prev\">&laquo; Newer Entries</a></span>"
navNext Nothing = "<span class=\"older\">&nbsp;</span>"
- navNext (Just url) = "<span class=\"older\"><a href=\"" ++ url ++ "\" >Older Entries &raquo;</a></span>"
+ navNext (Just url) = "<span class=\"older\"><a href=\"" ++ url ++ "\" rel=\"next\">Older Entries &raquo;</a></span>"
pageTitle 0 = ""
pageTitle i = " - Page " ++ show (i+1)