aboutsummaryrefslogtreecommitdiff
path: root/src/Text
diff options
context:
space:
mode:
authorJohn MacFarlane <fiddlosopher@gmail.com>2012-11-02 21:23:02 -0700
committerJohn MacFarlane <fiddlosopher@gmail.com>2012-11-02 21:23:02 -0700
commitdfca59943d2350ef8d5c1af66a0babbb488064ec (patch)
treefff69de6710969d473a4c2b59387d602d8487bdb /src/Text
parentafa5a4da6779ff448868cb08ce5a9cfdf1d1b845 (diff)
downloadpandoc-dfca59943d2350ef8d5c1af66a0babbb488064ec.tar.gz
EPUB: Don't use opf:role in EPUB3.
Diffstat (limited to 'src/Text')
-rw-r--r--src/Text/Pandoc/Writers/EPUB.hs3
1 files changed, 2 insertions, 1 deletions
diff --git a/src/Text/Pandoc/Writers/EPUB.hs b/src/Text/Pandoc/Writers/EPUB.hs
index e9b13c979..f22d82924 100644
--- a/src/Text/Pandoc/Writers/EPUB.hs
+++ b/src/Text/Pandoc/Writers/EPUB.hs
@@ -343,7 +343,8 @@ metadataElement version metadataXML uuid lang title authors date currentTime mbC
[ unode "dc:language" lang | not (elt `contains` "language") ] ++
[ unode "dc:identifier" ! [("id","BookId")] $ show uuid |
not (elt `contains` "identifier") ] ++
- [ unode "dc:creator" ! [("opf:role","aut")] $ a | a <- authors ] ++
+ [ unode "dc:creator" ! [("opf:role","aut") | version == EPUB2]
+ $ a | a <- authors ] ++
[ unode "dc:date" date | not (elt `contains` "date") ] ++
[ unode "meta" ! [("property", "dcterms:modified")] $
(showDateTimeISO8601 currentTime) | version == EPUB3 ] ++