Update a test for current $/-per-routine spec.

Raku · Sep 19, 2011 · b68a710 · b68a710
1 parent f3dfe0e
commit b68a710
Showing 1 changed file with 2 additions and 1 deletion.
diff --git a/S05-modifier/pos.t b/S05-modifier/pos.t
@@ -24,14 +24,15 @@ for ("abcdef") {
 #?rakudo skip "s:pos/// NYI"
 {
     $_ = "foofoofoo foofoofoo";
-    $/ := Any;
+    $/ = Any;
     ok(s:global:pos/foo/FOO/, 'Globally contiguous substitution');
     is($_, "FOOFOOFOO foofoofoo", 'Correctly substituted contiguously');
 }
 
 #?niecza skip ':i'
 {
     my $str = "abcabcabc";
+    $/ = Any;
     ok($str ~~ m:p/abc/, 'Continued match');
 
     ok($/.to == 3, 'Continued match pos');