DocBook writer: use literallayout element for LineBlock.

See #10825.
2026-08-23 08:46:56 +00:00 · 2025-05-08 11:28:00 -07:00
parent 60b4011902
commit 8e327ea4e3
1 changed files with 1 additions and 1 deletions
@@ -246,7 +246,7 @@ blockToDocBook opts (Para lst)
                        <$> inlinesToDocBook opts lst
  | otherwise         = inTagsIndented "para" <$> inlinesToDocBook opts lst
 blockToDocBook opts (LineBlock lns) =
-  blockToDocBook opts $ linesToPara lns
+  inTags False "literallayout" [] . vcat <$> mapM (inlinesToDocBook opts) lns
 blockToDocBook opts (BlockQuote blocks) =
  inTagsIndented "blockquote" <$> blocksToDocBook opts blocks
 blockToDocBook opts (CodeBlock (_,classes,_) str) = return $