@@ -264,9 +264,8 @@ elementToHtml slideLevel opts (Sec level num id' title' elements) = do
264264 -- title slides have no content of their own
265265 then filter isSec elements
266266 else elements
267− let header'' = if (writerStrictMarkdown opts ||
268− writerSectionDivs opts ||
269− writerSlideVariant opts == S5Slides)
267+ let header'' = if (writerStrictMarkdown opts || writerSectionDivs opts ||
268+ writerSlideVariant opts == S5Slides || slide)
270269 then header'
271270 else header' ! prefixedId opts id'
272271 let inNl x = mconcat $ nl opts : intersperse (nl opts) x ++ [nl opts]