@@ -390,7 +390,7 @@ metadataElement version metadataXML uuid lang title authors date currentTime mbC
390390 [ unode "dc:identifier" ! [("id","BookId")] $ show uuid |
391391 not (elt `contains` "identifier") ] ++
392392 [ unode "dc:creator" ! [("opf:role","aut") | version == EPUB2]
393− $ a | a <- authors ] ++
393+ $ a | a <- authors, not (elt `contains` "creator") ] ++
394394 [ unode "dc:date" date | not (elt `contains` "date") ] ++
395395 [ unode "meta" ! [("property", "dcterms:modified")] $
396396 (showDateTimeISO8601 currentTime) | version == EPUB3] ++