summaryrefslogtreecommitdiff
path: root/src/Text/Pandoc/Readers
diff options
context:
space:
mode:
authorJohn MacFarlane <jgm@berkeley.edu>2023-12-09 15:28:54 -0800
committerJohn MacFarlane <jgm@berkeley.edu>2023-12-09 15:28:54 -0800
commitcf0a0504344b7cb4f096d7404cbcd3eeddbe5395 (patch)
tree2976b4c56ef53b0a2ae86022ce62188abcc083fb /src/Text/Pandoc/Readers
parentd5e7c0ed1d7a6f1a27ab56c932ab21cabb371a83 (diff)
Typst reader: fix temporary regression in cite.
Diffstat (limited to 'src/Text/Pandoc/Readers')
-rw-r--r--src/Text/Pandoc/Readers/Typst.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Text/Pandoc/Readers/Typst.hs b/src/Text/Pandoc/Readers/Typst.hs
index ef83360e0..89f0da83f 100644
--- a/src/Text/Pandoc/Readers/Typst.hs
+++ b/src/Text/Pandoc/Readers/Typst.hs
@@ -400,7 +400,7 @@ inlineHandlers = M.fromList
,("footnote", \_ fields ->
B.note <$> (getField "body" fields >>= pWithContents pBlocks))
,("cite", \_ fields -> do
- key <- getField "key" fields
+ VLabel key <- getField "key" fields
(form :: Text) <- getField "form" fields <|> pure "normal"
let citation =
B.Citation