diff options
| author | John MacFarlane <jgm@berkeley.edu> | 2022-01-06 10:45:15 -0800 |
|---|---|---|
| committer | John MacFarlane <jgm@berkeley.edu> | 2022-01-06 10:45:15 -0800 |
| commit | 517d7a9cd3ebb5c63294540275cdd06c5f675ef9 (patch) | |
| tree | 0ed1c3cbd049582d9f4009ac54c75b44d9600592 /src | |
| parent | 4be41e3bb54449597b998788753717a6765b413b (diff) | |
reveal.js: don't add r-fit-text class to section.
It must go on header only. See
https://github.com/jgm/pandoc/issues/5965#issuecomment-1006623836
Diffstat (limited to 'src')
| -rw-r--r-- | src/Text/Pandoc/Writers/HTML.hs | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/src/Text/Pandoc/Writers/HTML.hs b/src/Text/Pandoc/Writers/HTML.hs index 1cfce7afd..a07847913 100644 --- a/src/Text/Pandoc/Writers/HTML.hs +++ b/src/Text/Pandoc/Writers/HTML.hs @@ -816,7 +816,9 @@ blockToHtmlInner opts (Div (ident, "section":dclasses, dkvs) ["section" | (slide || writerSectionDivs opts) && not html5 ] ++ ["level" <> tshow level | slide || writerSectionDivs opts ] - <> dclasses + <> [d | d <- dclasses, + slideVariant /= RevealJsSlides || + d /= "r-fit-text"] -- see #5965 let attr = (ident, classes', dkvs) if titleSlide then do |
