From d29ef39f6f59cfa4cf8f9cc61c64b75d20b054b4 Mon Sep 17 00:00:00 2001 From: John MacFarlane Date: Tue, 14 Nov 2017 20:57:41 -0800 Subject: EPUB writer: fix paths for cover image. Closes #4069. --- src/Text/Pandoc/Writers/EPUB.hs | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'src/Text/Pandoc') diff --git a/src/Text/Pandoc/Writers/EPUB.hs b/src/Text/Pandoc/Writers/EPUB.hs index e943ef17f..7062fd925 100644 --- a/src/Text/Pandoc/Writers/EPUB.hs +++ b/src/Text/Pandoc/Writers/EPUB.hs @@ -667,7 +667,7 @@ pandocToEPUB version opts doc@(Pandoc meta _) = do [ unode "reference" ! [("type","cover") ,("title","Cover") - ,("href","cover.xhtml")] $ () + ,("href","text/cover.xhtml")] $ () | isJust (epubCoverImage metadata) ] ] @@ -770,7 +770,7 @@ pandocToEPUB version opts doc@(Pandoc meta _) = do ,("hidden","hidden")] $ [ unode "ol" $ [ unode "li" - [ unode "a" ! [("href", "cover.xhtml") + [ unode "a" ! [("href", "text/cover.xhtml") ,("epub:type", "cover")] $ "Cover"] | epubCoverImage metadata /= Nothing -- cgit v1.2.3