Allow split's $limit to be Whatever.

sorear · Jan 1, 2012 · 9b00872 · 9b00872
1 parent 92420ba
commit 9b00872
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/lib/CORE.setting b/lib/CORE.setting
@@ -376,7 +376,7 @@ my class Cool {
         my @out;
         my $i = 0;
         my $last = 0;
-        my $limctr = $limit // Inf;
+        my $limctr = $limit ~~ Whatever ?? Inf !! $limit // Inf;
         my $M;
         while ($i <= chars $str) && ($limctr > 1) {
             $M = head($matchrx($C.cursor($i++)));