From 5679681ac15de8b3b7d1cc0db6745f6787141e23 Mon Sep 17 00:00:00 2001
From: Jasper Van der Jeugt <m@jaspervdj.be>
Date: Fri, 16 Aug 2013 11:48:05 +0200
Subject: [PATCH] Change type: metadataField :: Context a

Closes #175
---
 src/Hakyll/Web/Template/Context.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/Hakyll/Web/Template/Context.hs b/src/Hakyll/Web/Template/Context.hs
index 98662dd..cd52eb0 100644
--- a/src/Hakyll/Web/Template/Context.hs
+++ b/src/Hakyll/Web/Template/Context.hs
@@ -130,7 +130,7 @@ bodyField key = field key $ return . itemBody
 
 --------------------------------------------------------------------------------
 -- | Map any field to its metadata value, if present
-metadataField :: Context String
+metadataField :: Context a
 metadataField = Context $ \k i -> do
     value <- getMetadataField (itemIdentifier i) k
     maybe empty (return . StringField) value