diff options
author | Jasper Van der Jeugt <jaspervdj@gmail.com> | 2012-07-13 03:05:44 -0700 |
---|---|---|
committer | Jasper Van der Jeugt <jaspervdj@gmail.com> | 2012-07-13 03:05:44 -0700 |
commit | 0f19aa93537d90259c04b09961e4d7afa2923363 (patch) | |
tree | 61dbfd98631c75de3ac70f4b01622aafb3417257 /src | |
parent | 3e6a8bae7a0f88c240a61bc2529ed5501a7df917 (diff) | |
parent | ca5fb1378e1af062baf6d4c74edf0ddd42bbd50f (diff) | |
download | hakyll-0f19aa93537d90259c04b09961e4d7afa2923363.tar.gz |
Merge pull request #72 from crodjer/master
A tiny changeset and add my site
Diffstat (limited to 'src')
-rw-r--r-- | src/Hakyll/Web/Feed.hs | 3 |
1 files changed, 3 insertions, 0 deletions
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 |