DocBook reader: handle address and coyright in metadata.

See #7747.
This commit is contained in:
John MacFarlane 2022-02-28 10:21:57 -08:00
parent b94ad5b2ed
commit 326a00ab1a

View file

@ -612,6 +612,8 @@ addMetadataFromElement e =
"date" -> addContentsToMetadata "date" elt
"release" -> addContentsToMetadata "release" elt
"releaseinfo" -> addContentsToMetadata "releaseinfo" elt
"address" -> addContentsToMetadata "address" elt
"copyright" -> addContentsToMetadata "copyright" elt
"author" -> fromAuthor elt >>= addMeta "author"
"authorgroup" ->
mapM fromAuthor (filterChildren (named "author") elt) >>= addMeta "author"