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 ]
|
[ unode "ol" landmarkItems ]
|
||||||
| not (null landmarkItems)]
|
| not (null landmarkItems)]
|
||||||
navData <- lift $ writeHtml opts'{ writerVariables =
|
navData <- lift $ writeHtml opts'{ writerVariables =
|
||||||
Context (M.fromList [("navpage", toVal' "true")])
|
Context (M.fromList [("navpage", toVal' "true")
|
||||||
|
,("body-type", toVal' "frontmatter")
|
||||||
|
])
|
||||||
<> cssvars False <> vars }
|
<> cssvars False <> vars }
|
||||||
(Pandoc (setMeta "title"
|
(Pandoc (setMeta "title"
|
||||||
(walk removeNote $ fromList $ docTitle' meta) nullMeta)
|
(walk removeNote $ fromList $ docTitle' meta) nullMeta)
|
||||||
|
|
Loading…
Add table
Reference in a new issue