diff options
author | John MacFarlane <jgm@berkeley.edu> | 2019-12-21 09:20:07 -0800 |
---|---|---|
committer | John MacFarlane <jgm@berkeley.edu> | 2019-12-21 09:20:07 -0800 |
commit | 42f0b0cdab19e73100d9b8fe91722290048a7b55 (patch) | |
tree | 21633cc8189fe7b81a30e23e84ba87da466614f6 /src | |
parent | e77c218fbc94537c7e8c79dc3587fafd70fee5f6 (diff) | |
download | pandoc-42f0b0cdab19e73100d9b8fe91722290048a7b55.tar.gz |
Fix regression with --number-sections.
Starting with 2.8, `--number-sections` also had the
effect of `--section-divs`, even if `--section-divs` was
not specified.
Diffstat (limited to 'src')
-rw-r--r-- | src/Text/Pandoc/Writers/HTML.hs | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/src/Text/Pandoc/Writers/HTML.hs b/src/Text/Pandoc/Writers/HTML.hs index 784606dd5..32a3b853b 100644 --- a/src/Text/Pandoc/Writers/HTML.hs +++ b/src/Text/Pandoc/Writers/HTML.hs @@ -684,8 +684,7 @@ blockToHtml opts (Div (ident, "section":dclasses, dkvs) else id) $ t <> if null innerSecs then mempty else nl opts <> innerContents - else if writerSectionDivs opts || slide || not (null dclasses) || - not (null dkvs) + else if writerSectionDivs opts || slide || not (null dclasses) then addAttrs opts attr $ secttag $ nl opts <> header' <> nl opts <> |