aboutsummaryrefslogtreecommitdiff
path: root/src
diff options
context:
space:
mode:
authorSen-wen DENG <[email protected]>2025-02-02 21:09:08 +0100
committerGitHub <[email protected]>2025-02-02 12:09:08 -0800
commitb8c2d99c5a7ec087c1c9f1320a01672f8bcfe599 (patch)
treebe962a046f8cc0b8670a8e257fd830b75444c306 /src
parent7207f6ba00c80653d2b839863fb36e62752ec059 (diff)
DocBook reader: better handle informalequation (#10592)
Include id attribute. The code should be credited to @tombolano.
Diffstat (limited to 'src')
-rw-r--r--src/Text/Pandoc/Readers/DocBook.hs3
1 files changed, 2 insertions, 1 deletions
diff --git a/src/Text/Pandoc/Readers/DocBook.hs b/src/Text/Pandoc/Readers/DocBook.hs
index c26cfff9d..24db90e17 100644
--- a/src/Text/Pandoc/Readers/DocBook.hs
+++ b/src/Text/Pandoc/Readers/DocBook.hs
@@ -879,7 +879,8 @@ parseBlock (Elem e) =
"bibliomisc" -> parseMixed para (elContent e)
"bibliomixed" -> parseMixed para (elContent e)
"equation" -> para <$> equation e displayMath
- "informalequation" -> para <$> equation e displayMath
+ "informalequation" -> divWith (attrValue "id" e,["informalequation"],[]) .
+ para <$> equation e displayMath
"glosssee" -> para . (\ils -> text "See " <> ils <> str ".")
<$> getInlines e
"glossseealso" -> para . (\ils -> text "See also " <> ils <> str ".")