EPUB writer: Fixed path for cover image.
It was previously `media/media/imagename`, and should have
been `media/imagename`.
commitc2a68ad7632cfa0ee00cd7bac9c7ee58f9947abd
authorJohn MacFarlane <jgm@berkeley.edu>
dateTue 14 Nov 2017, 21:06 (9 years ago)
parentd29ef39
src/Text/Pandoc/Writers/EPUB.hs+1−1
@@ -434,7 +434,7 @@ pandocToEPUB version opts doc@(Pandoc meta _) = do
434434 case epubCoverImage metadata of
435435 Nothing -> return ([],[])
436436 Just img -> do
437− let coverImage = "media/" ++ takeFileName img
437+ let coverImage = takeFileName img
438438 cpContent <- lift $ writeHtml
439439 opts'{ writerVariables =
440440 ("coverpage","true"):