aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorJohn MacFarlane <[email protected]>2024-02-04 22:01:26 -0800
committerJohn MacFarlane <[email protected]>2024-02-04 22:01:26 -0800
commit1e05f32ead3da5bf8c81f78f2c7ccb2971e69044 (patch)
tree17f93b0399f7f09f88a287700350e26b6b0e5acc
parentc38623a7ee790ec35d8e279fbf839f4c3753d6c7 (diff)
Typst reader: fix character used for `norm`.
See jgm/typst-hs#38.
-rw-r--r--src/Text/Pandoc/Readers/Typst/Math.hs2
-rw-r--r--test/typst-reader.native2
2 files changed, 2 insertions, 2 deletions
diff --git a/src/Text/Pandoc/Readers/Typst/Math.hs b/src/Text/Pandoc/Readers/Typst/Math.hs
index fdd6771a8..e06e1c680 100644
--- a/src/Text/Pandoc/Readers/Typst/Math.hs
+++ b/src/Text/Pandoc/Readers/Typst/Math.hs
@@ -229,7 +229,7 @@ handleMath tok =
pure $ EDelimited "\8968" "\8969" [Right body]
Elt "math.norm" _ fields -> do
body <- getField "body" fields >>= pMathGrouped
- pure $ EDelimited "\8741" "\8741" [Right body]
+ pure $ EDelimited "\8214" "\8214" [Right body]
Elt "math.round" _ fields -> do
body <- getField "body" fields >>= pMathGrouped
pure $ EDelimited "\8970" "\8969" [Right body]
diff --git a/test/typst-reader.native b/test/typst-reader.native
index 0e00bc1ab..3095cea29 100644
--- a/test/typst-reader.native
+++ b/test/typst-reader.native
@@ -4045,7 +4045,7 @@ Pandoc
( "" , [ "box" ] , [] )
[ Math
InlineMath
- "\\left. \\parallel{} \\right.\\parallel"
+ "\\left\\| {} \\right\\|"
, Str "\8192"
, Code ( "" , [] , [] ) "norm(\"\")"
]