diff options
author | John MacFarlane <jgm@berkeley.edu> | 2014-12-15 10:22:19 -0800 |
---|---|---|
committer | John MacFarlane <jgm@berkeley.edu> | 2014-12-15 10:22:19 -0800 |
commit | c37db57c9a4f2d812ae75371757ccaa2bbe8ecef (patch) | |
tree | af205b0fe4b3e3310bb0ba73d9bb8908ca2be6ce | |
parent | 47c360e0795a5f27e4906ea22fff388b779f270a (diff) |
EPUB writer: Removed playOrder from navpoint elements in ncx file.
These aren't required, and they make manual modification of epubs
difficult. Closes #1760.
-rw-r--r-- | src/Text/Pandoc/Writers/EPUB.hs | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/src/Text/Pandoc/Writers/EPUB.hs b/src/Text/Pandoc/Writers/EPUB.hs index 2291c7184..3f9c6a606 100644 --- a/src/Text/Pandoc/Writers/EPUB.hs +++ b/src/Text/Pandoc/Writers/EPUB.hs @@ -570,8 +570,7 @@ writeEPUB opts doc@(Pandoc meta _) = do let navMapFormatter :: Int -> String -> String -> [Element] -> Element navMapFormatter n tit src subs = unode "navPoint" ! - [("id", "navPoint-" ++ show n) - ,("playOrder", show n)] $ + [("id", "navPoint-" ++ show n)] $ [ unode "navLabel" $ unode "text" tit , unode "content" ! [("src", src)] $ () ] ++ subs |