From c9255712fb0129c86a153cd1ab1156376be2ae08 Mon Sep 17 00:00:00 2001 From: Pascal Wittmann Date: Sun, 26 Jan 2014 15:22:47 +0100 Subject: [PATCH] Wrap the name of the author in a name element. According to http://tools.ietf.org/html/rfc4287 the atom:author element contains a person construct, that is it contains at least the name element. --- yesod-newsfeed/Yesod/AtomFeed.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/yesod-newsfeed/Yesod/AtomFeed.hs b/yesod-newsfeed/Yesod/AtomFeed.hs index a9c0d257..95c03c92 100644 --- a/yesod-newsfeed/Yesod/AtomFeed.hs +++ b/yesod-newsfeed/Yesod/AtomFeed.hs @@ -62,7 +62,7 @@ template Feed {..} render = : Element "link" (Map.singleton "href" $ render feedLinkHome) [] : Element "updated" Map.empty [NodeContent $ formatW3 feedUpdated] : Element "id" Map.empty [NodeContent $ render feedLinkHome] - : Element "author" Map.empty [NodeContent feedAuthor] + : Element "author" Map.empty [NodeElement $ Element "name" Map.empty [NodeContent feedAuthor]] : map (flip entryTemplate render) feedEntries entryTemplate :: FeedEntry url -> (url -> Text) -> Element