From d9aa4be1f38c44390997b49bcd02dec966655cdf Mon Sep 17 00:00:00 2001
From: Matthias Schiffer <mschiffer@universe-factory.net>
Date: Fri, 1 Jun 2012 22:44:27 +0200
Subject: Various fixes

---
 hakyll.hs | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

(limited to 'hakyll.hs')

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)
-- 
cgit v1.2.3