@@ -478,7 +478,12 @@ footnoteSection opts notes = do
478478 html5 <- gets stHtml5
479479 slideVariant <- gets stSlideVariant
480480 let hrtag = if html5 then H5.hr else H.hr
481+ epubVersion <- gets stEPUBVersion
481482 let container x
483+ | html5
484+ , epubVersion == Just EPUB3
485+ = H5.section ! A.class_ "footnotes"
486+ ! customAttribute "epub:type" "footnotes" $ x
482487 | html5 = H5.section ! A.class_ "footnotes" $ x
483488 | slideVariant /= NoSlides = H.div ! A.class_ "footnotes slide" $ x
484489 | otherwise = H.div ! A.class_ "footnotes" $ x