[io grant] No need for .ends-with

zoffixznet · web-flow · commit 110efb41af0b · 2017-03-12T01:01:51.000-05:00
diff --git a/doc/Type/IO/Path.pod6 b/doc/Type/IO/Path.pod6
@@ -231,7 +231,7 @@ my @stack = '.'.IO;
 my $perl-files = gather while @stack {
     with @stack.pop {
         when :d { @stack.append: .dir }
-        .take when .extension.lc.ends-with: 'p6'
+        .take when .extension.lc eq 'p6'
     }
 }
 .put for $perl-files[^3];

Original file line number	Diff line number	Diff line change
`@@ -231,7 +231,7 @@ my @stack = '.'.IO;`
`231`	`231`	`my $perl-files = gather while @stack {`
`232`	`232`	`with @stack.pop {`
`233`	`233`	`when :d { @stack.append: .dir }`
`234`		`- .take when .extension.lc.ends-with: 'p6'`
	`234`	`+ .take when .extension.lc eq 'p6'`
`235`	`235`	`}`
`236`	`236`	`}`
`237`	`237`	`.put for $perl-files[^3];`