diff options
| author | John MacFarlane <jgm@berkeley.edu> | 2016-03-26 13:14:50 -0700 |
|---|---|---|
| committer | John MacFarlane <jgm@berkeley.edu> | 2016-03-26 13:14:50 -0700 |
| commit | f74498cb47d360f58e5c28ad848c94197978cc6e (patch) | |
| tree | a5743211d469c243951986c884ada76abc814ab1 /src/Text/Pandoc | |
| parent | 4d5450d4937e971e8f3650eebd71835ca2cd9e17 (diff) | |
EPUB writer: set 'navpage' variable on nav page.
This allows templates to treat it differently.
Diffstat (limited to 'src/Text/Pandoc')
| -rw-r--r-- | src/Text/Pandoc/Writers/EPUB.hs | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/src/Text/Pandoc/Writers/EPUB.hs b/src/Text/Pandoc/Writers/EPUB.hs index 804dbb926..90f502f6f 100644 --- a/src/Text/Pandoc/Writers/EPUB.hs +++ b/src/Text/Pandoc/Writers/EPUB.hs @@ -667,7 +667,8 @@ writeEPUB opts doc@(Pandoc meta _) = do ] ] else [] - let navData = renderHtml $ writeHtml opts' + let navData = renderHtml $ writeHtml + opts'{ writerVariables = ("navpage","true"):vars } (Pandoc (setMeta "title" (walk removeNote $ fromList $ docTitle' meta) nullMeta) (navBlocks ++ landmarks)) |