aboutsummaryrefslogtreecommitdiff
path: root/src/Text/Pandoc/Writers
diff options
context:
space:
mode:
authorJohn MacFarlane <jgm@berkeley.edu>2019-12-21 09:20:07 -0800
committerJohn MacFarlane <jgm@berkeley.edu>2019-12-21 09:20:07 -0800
commit42f0b0cdab19e73100d9b8fe91722290048a7b55 (patch)
tree21633cc8189fe7b81a30e23e84ba87da466614f6 /src/Text/Pandoc/Writers
parente77c218fbc94537c7e8c79dc3587fafd70fee5f6 (diff)
downloadpandoc-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/Text/Pandoc/Writers')
-rw-r--r--src/Text/Pandoc/Writers/HTML.hs3
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 <>