@@ -75,18 +75,19 @@ writeEPUB version opts doc@(Pandoc meta _) = do
75 let epub3 = version == EPUB3
75 let epub3 = version == EPUB3
76 epochtime <- floor `fmap` getPOSIXTime
76 epochtime <- floor `fmap` getPOSIXTime
77 let mkEntry path content = toEntry path epochtime content
77 let mkEntry path content = toEntry path epochtime content
78+ let vars = ("epub3", if epub3 then "true" else "false"):writerVariables opts
78 let opts' = opts{ writerEmailObfuscation = NoObfuscation
79 let opts' = opts{ writerEmailObfuscation = NoObfuscation
79 , writerStandalone = True
80 , writerStandalone = True
80 , writerSectionDivs = True
81 , writerSectionDivs = True
81 , writerHtml5 = epub3
82 , writerHtml5 = epub3
82 , writerTableOfContents = False -- we always have one in epub
83 , writerTableOfContents = False -- we always have one in epub
84+ , writerVariables = vars
83 , writerHTMLMathMethod =
85 , writerHTMLMathMethod =
85 then MathML Nothing
87 then MathML Nothing
86 else writerHTMLMathMethod opts
88 else writerHTMLMathMethod opts
87 , writerWrapText = False }
89 , writerWrapText = False }
88 let sourceDir = writerSourceDirectory opts'
90 let sourceDir = writerSourceDirectory opts'
89− let vars = ("epub3", if epub3 then "true" else "false"):writerVariables opts'
90 let mbCoverImage = lookup "epub-cover-image" vars
91 let mbCoverImage = lookup "epub-cover-image" vars
92 titlePageTemplate <- readDataFile (writerUserDataDir opts')
93 titlePageTemplate <- readDataFile (writerUserDataDir opts')