From ff9af6c9e50bbe6d6bc58427338b703513622094 Mon Sep 17 00:00:00 2001
From: John MacFarlane <fiddlosopher@gmail.com>
Date: Wed, 20 Mar 2013 13:10:03 -0700
Subject: [PATCH] EPUB writer: Don't add dc:creator tags if present in epub
 metadata.

---
 src/Text/Pandoc/Writers/EPUB.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/Text/Pandoc/Writers/EPUB.hs b/src/Text/Pandoc/Writers/EPUB.hs
index c7b9d6ae7..d92103902 100644
--- a/src/Text/Pandoc/Writers/EPUB.hs
+++ b/src/Text/Pandoc/Writers/EPUB.hs
@@ -390,7 +390,7 @@ metadataElement version metadataXML uuid lang title authors date currentTime mbC
            [ unode "dc:identifier" ! [("id","BookId")] $ show uuid |
                not (elt `contains` "identifier") ] ++
            [ unode "dc:creator" ! [("opf:role","aut") | version == EPUB2]
-                     $ a | a <- authors ] ++
+                     $ a | a <- authors, not (elt `contains` "creator") ] ++
            [ unode "dc:date" date | not (elt `contains` "date") ] ++
            [ unode "meta" ! [("property", "dcterms:modified")] $
                (showDateTimeISO8601 currentTime) | version == EPUB3] ++