Typst writer: put label after Span, not before.

Labels get applied to preceding markup item.
This commit is contained in:
John MacFarlane
2024-03-22 22:38:34 -07:00
parent 354e0fd349
commit db59b8ed08
+1 -1
View File
@@ -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 "\""