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.
This commit is contained in:
parent
a6594f5408
commit
c9255712fb
@ -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
|
||||
|
||||
Loading…
Reference in New Issue
Block a user