[Any.match] remove some duplicated code

rakudo · May 18, 2010 · 6aedf5e · 6aedf5e
1 parent 72ed16f
commit 6aedf5e
Showing 1 changed file with 1 addition and 6 deletions.
diff --git a/src/core/Cool-str.pm b/src/core/Cool-str.pm
@@ -205,12 +205,7 @@ augment class Cool {
             my $i = 1;
             my @r = gather while my $m = Regex::Cursor.parse(self, :rule($pat), |%opts) {
                 my $m-copy = $m;
-                if $nth.defined {
-                    if $i ~~ any(|$nth) {
-                        take $m-copy;
-                        $taken++;
-                    }
-                } else {
+                unless $nth.defined && ($i !~~ any |$nth) {
                     take $m-copy;
                     $taken++;
                 }