From 1130d7e610b18a1975843f4ae219b7e7e80ae300 Mon Sep 17 00:00:00 2001 From: Rohan Jain Date: Tue, 3 Apr 2012 15:58:16 +0530 Subject: Add author email to feed Signed-off-by: Rohan Jain --- src/Hakyll/Web/Feed.hs | 3 +++ 1 file changed, 3 insertions(+) (limited to 'src') diff --git a/src/Hakyll/Web/Feed.hs b/src/Hakyll/Web/Feed.hs index e7aecc9..f2f3342 100644 --- a/src/Hakyll/Web/Feed.hs +++ b/src/Hakyll/Web/Feed.hs @@ -45,6 +45,8 @@ data FeedConfiguration = FeedConfiguration feedDescription :: String , -- | Name of the feed author. feedAuthorName :: String + , -- | Email of the feed author. + feedAuthorEmail :: String , -- | Absolute root URL of the feed site (e.g. @http://jaspervdj.be@) feedRoot :: String } deriving (Show, Eq) @@ -65,6 +67,7 @@ createFeed feedTemplate itemTemplate url configuration items = $ trySetField "title" (feedTitle configuration) $ trySetField "description" (feedDescription configuration) $ trySetField "authorName" (feedAuthorName configuration) + $ trySetField "authorEmail" (feedAuthorEmail configuration) $ trySetField "root" (feedRoot configuration) $ trySetField "url" url $ fromBody body -- cgit v1.2.3