fix(typst): preserve bare table labels

Emit the existing label after tables with typst:no-figure, including
those with scoped text properties.

Cover identifiers, explicit label precedence, and scoped text properties
with three command tests.

Author: zenor0

src/Text/Pandoc/Writers/Typst.hs

@@ -364,7 +364,7 @@ blockToTypst block =
             )
             $$ ")"
       return $ if "typst:no-figure" `elem` tabclasses
-        then toTypstBracesSetText typstTextAttrs table
+        then toTypstBracesSetText typstTextAttrs table $$ lab
         else "#figure("
             $$
             nest 2

test/command/typst-table-labels.md

@@ -0,0 +1,50 @@
+Identifiers are preserved on tables without a figure wrapper.
+
+```
+% pandoc -f html -t typst
+<table id="table-id" class="typst:no-figure">
+  <tr><td>A</td><td>B</td></tr>
+</table>
+^D
+#table(
+  columns: 2,
+  align: (auto,auto,),
+  [A], [B],
+)
+<table-id>
+```
+
+An explicit Typst label takes precedence over the identifier.
+
+```
+% pandoc -f html -t typst
+<table id="table-id" class="typst:no-figure" typst-label="table-label">
+  <tr><td>A</td><td>B</td></tr>
+</table>
+^D
+#table(
+  columns: 2,
+  align: (auto,auto,),
+  [A], [B],
+)
+<table-label>
+```
+
+Labels follow scoped text properties.
+
+```
+% pandoc -f html -t typst
+<table class="typst:no-figure" typst-label="table label"
+       typst:text:size="3em">
+  <tr><td>A</td><td>B</td></tr>
+</table>
+<p>Paragraph after.</p>
+^D
+#{set text(size: 3em);table(
+  columns: 2,
+  align: (auto,auto,),
+  [A], [B],
+)}
+#label("table label")
+Paragraph after.
+```