EPUB writer: add frontmatter type on body element for nav.xhtml.
Closes #6918.
This commit is contained in:
parent
5bbd5a9e80
commit
9c6cc79c11
1 changed files with 3 additions and 1 deletions
|
@ -845,7 +845,9 @@ pandocToEPUB version opts doc = do
|
|||
[ unode "ol" landmarkItems ]
|
||||
| not (null landmarkItems)]
|
||||
navData <- lift $ writeHtml opts'{ writerVariables =
|
||||
Context (M.fromList [("navpage", toVal' "true")])
|
||||
Context (M.fromList [("navpage", toVal' "true")
|
||||
,("body-type", toVal' "frontmatter")
|
||||
])
|
||||
<> cssvars False <> vars }
|
||||
(Pandoc (setMeta "title"
|
||||
(walk removeNote $ fromList $ docTitle' meta) nullMeta)
|
||||
|
|
Loading…
Reference in a new issue