From d9e0c3e86b03834a03e7ddf37b70cc141eccfe1c Mon Sep 17 00:00:00 2001
From: Jasper Van der Jeugt <jaspervdj@gmail.com>
Date: Wed, 9 Feb 2011 19:28:53 +0100
Subject: Some tests for the Page module

---
 src/Hakyll/Web/Page/Internal.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'src/Hakyll')

diff --git a/src/Hakyll/Web/Page/Internal.hs b/src/Hakyll/Web/Page/Internal.hs
index 3192141..dd47197 100644
--- a/src/Hakyll/Web/Page/Internal.hs
+++ b/src/Hakyll/Web/Page/Internal.hs
@@ -20,7 +20,7 @@ import Hakyll.Core.Writable
 data Page a = Page
     { pageMetadata :: Map String String
     , pageBody     :: a
-    } deriving (Show, Typeable)
+    } deriving (Eq, Show, Typeable)
 
 instance Monoid a => Monoid (Page a) where
     mempty = Page M.empty mempty
-- 
cgit v1.2.3