diff --git a/src/Text/Pandoc/Writers/Typst.hs b/src/Text/Pandoc/Writers/Typst.hs index b764f7476..38029ca56 100644 --- a/src/Text/Pandoc/Writers/Typst.hs +++ b/src/Text/Pandoc/Writers/Typst.hs @@ -324,7 +324,7 @@ defListItemToTypst (term, defns) = do modify $ \st -> st{ stEscapeContext = NormalContext } defns' <- mapM blocksToTypst defns return $ nowrap ("/ " <> term' <> ": " <> "#block[") $$ - chomp (vcat defns') $$ "]" + chomp (vsep defns') $$ "]" listItemToTypst :: PandocMonad m => Int -> Doc Text -> [Block] -> TW m (Doc Text) listItemToTypst ind marker blocks = do diff --git a/test/writer.typst b/test/writer.typst index 9c5a8f921..b9f15b45c 100644 --- a/test/writer.typst +++ b/test/writer.typst @@ -462,11 +462,13 @@ Multiple definitions, tight: / apple: #block[ red fruit + computer ] / orange: #block[ orange fruit + bank ]