Simplify :as specification, suggested by moritz++

Raku · Aug 4, 2013 · f22dd02 · f22dd02
1 parent 3dd1995
commit f22dd02
Show file tree

Hide file tree

Showing 2 changed files with 2 additions and 2 deletions.
diff --git a/S32-list/squish.t b/S32-list/squish.t
@@ -63,7 +63,7 @@ This test tests the C<squish> builtin and .squish method on Any/List.
 #?niecza skip 'NYI'
 {
     my @array = <a b bb c d e f f a>;
-    my $as    = {substr $^a,0,1};
+    my $as    = *.substr: 0,1;
     is_deeply @array.squish(:$as),  <a b c d e f a>.list.item,
       "method form of squish with :as works";
     is_deeply squish(@array,:$as), <a b c d e f a>.list.item,

diff --git a/S32-list/uniq.t b/S32-list/uniq.t
@@ -77,7 +77,7 @@ See the thread "[S32::Containers] uniq" on p6l, too.
 #?niecza skip 'NYI'
 {
     my @array = <a b bb c d e b bbbb b b f b>;
-    my $as    = {substr $^a,0,1};
+    my $as    = *.substr: 0,1;
     is_deeply @array.uniq(:$as),  <a b c d e f>.list.item,
       "method form of uniq with :as works";
     is_deeply uniq(@array,:$as), <a b c d e f>.list.item,