From 0a5ececcb466f28bf6b003fde71bc774267ae25b Mon Sep 17 00:00:00 2001
From: John MacFarlane <jgm@berkeley.edu>
Date: Thu, 22 Feb 2024 23:11:13 -0600
Subject: EPUB writer: omit EPUB2-specific meta tag on EPUB3.

This caused a validation failure in epubs with cover images.
Closes #9493.
---
 src/Text/Pandoc/Writers/EPUB.hs | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

(limited to 'src/Text')

diff --git a/src/Text/Pandoc/Writers/EPUB.hs b/src/Text/Pandoc/Writers/EPUB.hs
index 15b2625d5..d86985a47 100644
--- a/src/Text/Pandoc/Writers/EPUB.hs
+++ b/src/Text/Pandoc/Writers/EPUB.hs
@@ -1050,7 +1050,8 @@ metadataElement version md currentTime =
         rightsNodes = maybe [] (dcTag' "rights") $ epubRights md
         coverImageNodes = maybe []
             (\img -> [unode "meta" !  [(metaprop,"cover"),
-                                       ("content",toId img)] $ ()])
+                                       ("content",toId img)] $ ()
+                        | version == EPUB2])
             $ epubCoverImage md
         modifiedNodes = [ unode "meta" ! [(metaprop, "dcterms:modified")] $
                showDateTimeISO8601 currentTime | version == EPUB3 ]
-- 
cgit v1.2.3