aboutsummaryrefslogtreecommitdiff
path: root/src
diff options
context:
space:
mode:
authorJohn MacFarlane <[email protected]>2024-08-06 20:07:27 -0700
committerJohn MacFarlane <[email protected]>2024-08-06 20:07:27 -0700
commit1f093eab9827601ab91c9092a10830713fdd0f23 (patch)
tree4130fa875ea3456e4d11e05c6db4f69d63879d27 /src
parent5967d7ae0bac6a824aa5ddec4de2d97ec7f7420e (diff)
Asciidoc writer: preserve original base level.
We used to normalize so that the base level is always 1, but asciidoc no longer seems to care about that, and the behavior creates difficulties when we are converting fragments. Closes #10062.
Diffstat (limited to 'src')
-rw-r--r--src/Text/Pandoc/Writers/AsciiDoc.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Text/Pandoc/Writers/AsciiDoc.hs b/src/Text/Pandoc/Writers/AsciiDoc.hs
index b315f0e92..4eeedfdc3 100644
--- a/src/Text/Pandoc/Writers/AsciiDoc.hs
+++ b/src/Text/Pandoc/Writers/AsciiDoc.hs
@@ -104,7 +104,7 @@ pandocToAsciiDoc opts (Pandoc meta blocks) = do
(blockListToAsciiDoc opts)
(fmap chomp . inlineListToAsciiDoc opts)
meta
- main <- blockListToAsciiDoc opts $ makeSections False (Just 1) blocks
+ main <- blockListToAsciiDoc opts $ makeSections False Nothing blocks
st <- get
let context = defField "body" main
$ defField "toc"