List label styling

3 files changed, 38 insertions, 5 deletions

diff --git a/tests/ref/markup/enums.png b/tests/ref/markup/enums.png
index 04d6ee4d..ecd1cf53 100644
--- a/tests/ref/markup/enums.png
+++ b/tests/ref/markup/enums.png
diff --git a/tests/typ/markup/enums.typ b/tests/typ/markup/enums.typ
index aeff9f2c..8ba3cea6 100644
--- a/tests/typ/markup/enums.typ
+++ b/tests/typ/markup/enums.typ
@@ -21,3 +21,40 @@
 #for i in range(5) {
    [. #roman(1 + i)]
 }
+
+---
+// Test label pattern.
+#set enum(label: "~ A:")
+. First
+. Second
+
+#set enum(label: "(*)")
+. A
+. B
+. C
+
+#set enum(label: "i)")
+. A
+. B
+
+---
+// Test label closure.
+#enum(
+   start: 4,
+   spacing: -3pt,
+   label: n => text(fill: (red, green, blue)(mod(n, 3)), [#upper(letter(n))]),
+   [Red], [Green], [Blue],
+)
+
+---
+// Error: 18-20 invalid pattern
+#set enum(label: "")
+
+---
+// Error: 18-24 invalid pattern
+#set enum(label: "(())")
+
+---
+// Error: 18-28 expected template, found boolean
+#set enum(label: n => false)
+. A
diff --git a/tests/typ/utility/strings.typ b/tests/typ/utility/strings.typ
index d7a55356..87be630f 100644
--- a/tests/typ/utility/strings.typ
+++ b/tests/typ/utility/strings.typ
@@ -1,7 +1,7 @@
 // Test string functions.
 
 ---
-// Test the `upper`, `lower`, and number formatting functions. 
+// Test the `upper`, `lower`, and number formatting functions.
 #upper("Abc 8 def")
 
 #lower("SCREAMING MUST BE SILENCED in " + roman(1672) + " years")
@@ -15,9 +15,5 @@
 }
 
 ---
-// Error: 8-15 cannot convert integers greater than 3,999,999 to roman numerals
-#roman(8000000)
-
----
 // Error: 9-11 must be at least zero
 #symbol(-1)