Tissevert/pandoc
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions 1

EPUB writer: fix paths for cover image.

Browse source 
Closes #4069.
This commit is contained in:
John MacFarlane 2017-11-14 20:57:41 -08:00
parent c9407f85a0
commit d29ef39f6f
1 changed files with 2 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
src/Text/Pandoc/Writers/EPUB.hs
View file

@ -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