@@ -75,18 +75,19 @@ writeEPUB version opts doc@(Pandoc meta _) = do
7575 let epub3 = version == EPUB3
7676 epochtime <- floor `fmap` getPOSIXTime
7777 let mkEntry path content = toEntry path epochtime content
78+ let vars = ("epub3", if epub3 then "true" else "false"):writerVariables opts
7879 let opts' = opts{ writerEmailObfuscation = NoObfuscation
7980 , writerStandalone = True
8081 , writerSectionDivs = True
8182 , writerHtml5 = epub3
8283 , writerTableOfContents = False -- we always have one in epub
84+ , writerVariables = vars
8385 , writerHTMLMathMethod =
8486 if epub3
8587 then MathML Nothing
8688 else writerHTMLMathMethod opts
8789 , writerWrapText = False }
8890 let sourceDir = writerSourceDirectory opts'
89− let vars = ("epub3", if epub3 then "true" else "false"):writerVariables opts'
9091 let mbCoverImage = lookup "epub-cover-image" vars
9192
9293 titlePageTemplate <- readDataFile (writerUserDataDir opts')