git.iko.soy/typeable/pandoc
on master help sign in
HTML writer: avoid adding extra section nestings for revealjs.
0b3e885John MacFarlane
src/Text/Pandoc/Writers/HTML.hs+1−1
compare with master
unifiedsplit
@@ -461,7 +461,7 @@ elementToHtml slideLevel opts (Sec level num (id',classes,keyvals) title' elemen
461 t <- addAttrs opts attr $
461 t <- addAttrs opts attr $
462 secttag header'
462 secttag header'
463 return $
463 return $
464− (if slideVariant == RevealJsSlides
464+ (if slideVariant == RevealJsSlides && not (null innerContents)
465 then H5.section
465 then H5.section
466 else id) $ mconcat $ t : innerContents
466 else id) $ mconcat $ t : innerContents
467 else if writerSectionDivs opts || slide
467 else if writerSectionDivs opts || slide