From db59b8ed0835078285cab3f5113d22ab5eb21e0f Mon Sep 17 00:00:00 2001
From: John MacFarlane <jgm@berkeley.edu>
Date: Fri, 22 Mar 2024 22:38:34 -0700
Subject: Typst writer: put label after Span, not before.

Labels get applied to preceding markup item.
---
 src/Text/Pandoc/Writers/Typst.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/Text/Pandoc/Writers/Typst.hs b/src/Text/Pandoc/Writers/Typst.hs
index 245d0ec87..ed884d588 100644
--- a/src/Text/Pandoc/Writers/Typst.hs
+++ b/src/Text/Pandoc/Writers/Typst.hs
@@ -325,7 +325,7 @@ inlineToTypst inline =
     SmallCaps inlines -> textstyle "#smallcaps" inlines
     Span (ident,_,_) inlines -> do
       let lab = toLabel FreestandingLabel ident
-      (lab $$) <$> inlinesToTypst inlines
+      (<> lab) <$> inlinesToTypst inlines
     Quoted quoteType inlines -> do
       let q = case quoteType of
                    DoubleQuote -> literal "\""
-- 
cgit v1.2.3