aboutsummaryrefslogtreecommitdiff
path: root/src
diff options
context:
space:
mode:
Diffstat (limited to 'src')
-rw-r--r--src/Text/Pandoc/Writers/EPUB.hs6
1 files changed, 3 insertions, 3 deletions
diff --git a/src/Text/Pandoc/Writers/EPUB.hs b/src/Text/Pandoc/Writers/EPUB.hs
index f5e7da4b4..b0f6adecc 100644
--- a/src/Text/Pandoc/Writers/EPUB.hs
+++ b/src/Text/Pandoc/Writers/EPUB.hs
@@ -656,11 +656,11 @@ pandocToEPUB version opts doc = do
,("media-type","application/xhtml+xml")] ++
[("properties","nav") | epub3 ]) $ ()
] ++
- [ unode "item" ! [("id","style"), ("href",fp)
+ [ unode "item" ! [("id","stylesheet" ++ show n), ("href",fp)
,("media-type","text/css")] $ () |
- fp <- map
+ (n :: Int, fp) <- zip [1..] (map
(makeRelative epubSubdir . eRelativePath)
- stylesheetEntries ] ++
+ stylesheetEntries) ] ++
map chapterNode (cpgEntry ++ (tpEntry : chapterEntries)) ++
(case cpicEntry of
[] -> []