Make .grep(Mu) use .ACCEPTS instead of ~~

moritz++ for the pointer
rakudo · Sep 23, 2015 · be46c2e · be46c2e
1 parent 0cd80e4
commit be46c2e
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/src/core/Any-iterable-methods.pm b/src/core/Any-iterable-methods.pm
@@ -361,14 +361,14 @@ augment class Any {
             method pull-one() is rw {
                 my Mu $value;
                 until ($value := $!iter.pull-one) =:= IterationEnd {
-                    return-rw $value if $value ~~ $!test;
+                    return-rw $value if $!test.ACCEPTS($value);
                 }
                 IterationEnd
             }
             method push-all($target) {
                 my Mu $value;
                 until ($value := $!iter.pull-one) =:= IterationEnd {
-                    $target.push($value) if $value ~~ $!test;
+                    $target.push($value) if $!test.ACCEPTS($value);
                 }
                 IterationEnd
             }