aboutsummaryrefslogtreecommitdiff
path: root/src/Text/Pandoc
diff options
context:
space:
mode:
authorFlorian Klink <flokli@flokli.de>2019-10-30 16:51:33 +0100
committerJohn MacFarlane <jgm@berkeley.edu>2019-10-30 08:51:33 -0700
commitc6e936dec2fc0f0e4d15b7c6f7c4ed6934dd233a (patch)
tree859287bf1c5e4e0e9d46e4ccc4941c6016b4da5b /src/Text/Pandoc
parent080a3cdaebe074f588b9f6266d09e745f430487c (diff)
downloadpandoc-c6e936dec2fc0f0e4d15b7c6f7c4ed6934dd233a.tar.gz
docbook reader: fix nesting of chapters and sections (#5864)
* Set dbBook to true when traversing a chapter too. Currently, a `<title/>` in a chapter and in a `<section/>` below that chapter have the same level if they're not inside a `<book/>`. This can happen in a multi-file book project. Also see the example at https://tdg.docbook.org/tdg/4.5/chapter.html Co-authored-by: Félix Baylac-Jacqué <felix@alternativebit.fr> * Add docbook-chapter test This tests nested `<section/>` and makes sure `<title/>` in the first `<section/>` below `<chapter/>` is one level deeper than the `<chapter/>`'s `<title/>`, also when not inside a `<book/>`. Co-authored-by: Félix Baylac-Jacqué <felix@alternativebit.fr>
Diffstat (limited to 'src/Text/Pandoc')
-rw-r--r--src/Text/Pandoc/Readers/DocBook.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Text/Pandoc/Readers/DocBook.hs b/src/Text/Pandoc/Readers/DocBook.hs
index 80b7798a0..4ea5f6657 100644
--- a/src/Text/Pandoc/Readers/DocBook.hs
+++ b/src/Text/Pandoc/Readers/DocBook.hs
@@ -726,7 +726,7 @@ parseBlock (Elem e) =
mapM parseGlossEntry (filterChildren (named "glossentry") e)
"glosslist" -> definitionList <$>
mapM parseGlossEntry (filterChildren (named "glossentry") e)
- "chapter" -> sect 0
+ "chapter" -> modify (\st -> st{ dbBook = True}) >> sect 0
"appendix" -> sect 0
"preface" -> sect 0
"bridgehead" -> para . strong <$> getInlines e