For convenience, handle Str:D children in span-tree()

japhb · japhb · commit 1b21579b16c7 · 2025-11-25T22:02:43.000-08:00
diff --git a/lib/Terminal/Widgets/TextContent.rakumod b/lib/Terminal/Widgets/TextContent.rakumod
@@ -237,7 +237,8 @@ our sub interpolant-span(Str:D $var-name, :%flags, *%attributes) is export {
 
 #| Helper function to build up a SpanTree with SemanticSpan leaves
 our sub span-tree(*@children, *%attributes) is export {
-    SpanTree.new(:@children, :%attributes)
+    my @ss = @children.map({ $_ ~~ Str:D ?? string-span($_) !! $_ });
+    SpanTree.new(children => @ss, :%attributes)
 }
 
 #| Helper function to turn a plain Str into a parseable MarkupString

Original file line number	Diff line number	Diff line change
`@@ -237,7 +237,8 @@ our sub interpolant-span(Str:D $var-name, :%flags, *%attributes) is export {`
`237`	`237`
`238`	`238`	`#\| Helper function to build up a SpanTree with SemanticSpan leaves`
`239`	`239`	`our sub span-tree(@children, %attributes) is export {`
`240`		`- SpanTree.new(:@children, :%attributes)`
	`240`	`+ my @ss = @children.map({ $_ ~~ Str:D ?? string-span($_) !! $_ });`
	`241`	`+ SpanTree.new(children => @ss, :%attributes)`
`241`	`242`	`}`
`242`	`243`
`243`	`244`	`#\| Helper function to turn a plain Str into a parseable MarkupString`