aboutsummaryrefslogtreecommitdiff
path: root/src/Text
diff options
context:
space:
mode:
authorJohn MacFarlane <[email protected]>2023-07-10 21:24:23 -0700
committerJohn MacFarlane <[email protected]>2023-07-10 21:24:23 -0700
commit3496109d49bdf2de5d28435c04ef849b00d9e421 (patch)
treedfb44927978739b6a0f1e94ece53a5a0f151c1d3 /src/Text
parent79091f9910ee23ffdd69ac5592f93313871055da (diff)
Typst reader: fix regression in recognition of display math.
The last release caused all math to be parsed as inline math. Closes #8949.
Diffstat (limited to 'src/Text')
-rw-r--r--src/Text/Pandoc/Readers/Typst.hs3
1 files changed, 2 insertions, 1 deletions
diff --git a/src/Text/Pandoc/Readers/Typst.hs b/src/Text/Pandoc/Readers/Typst.hs
index b11414414..7c1b18b4e 100644
--- a/src/Text/Pandoc/Readers/Typst.hs
+++ b/src/Text/Pandoc/Readers/Typst.hs
@@ -95,7 +95,8 @@ pInline = try $ do
Txt t -> pure $ B.text t
Lab name -> pure $ B.spanWith (name, [], []) mempty
Elt (Identifier tname) _ _
- | "math." `T.isPrefixOf` tname ->
+ | "math." `T.isPrefixOf` tname
+ , tname /= "math.equation" ->
B.math . writeTeX <$> pMathMany (Seq.singleton res)
Elt name@(Identifier tname) pos fields ->
case M.lookup name inlineHandlers of