[perl.git] branch sprout/lexassign, updated. v5.21.5-368-gaefaca6

[Father Chrysostomos]

In perl.git, the branch sprout/lexassign has been updated

<http://perl5.git.perl.org/perl.git/commitdiff/aefaca653c2855b6f27594d9bf3fc463af811777?hp=1c1cfb84a5eec12e6b2129ecb9cf95e00b3311f5>

- Log -----------------------------------------------------------------
commit aefaca653c2855b6f27594d9bf3fc463af811777
Author: Father Chrysostomos <spr...@cpan.org>
Date:   Mon Nov 10 22:39:21 2014 -0800

    More lex_assign.t fix-ups
    
    Windows sometimes says ‘not implemented’.
-----------------------------------------------------------------------

Summary of changes:
 t/op/lex_assign.t | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/t/op/lex_assign.t b/t/op/lex_assign.t
index bd0c279..addd240 100644
--- a/t/op/lex_assign.t
+++ b/t/op/lex_assign.t
@@ -93,7 +93,7 @@ EOE
   if ($@) {
     $warning = $@;
     chomp $warning;
-    if ($@ !~ /is unimplemented/) {
+    if ($@ !~ /(?:is un|not)implemented/) {
       fail($_ . ' ' . $warning);
     }
   }
@@ -152,7 +152,7 @@ EOE
   if ($@) {
     $warning = $@;
     chomp $warning;
-    if ($@ =~ /is unimplemented/) {
+    if ($@ =~ /(?:is un|not)implemented/) {
       SKIP: {
         skip $warning, 1;
         pass($comment);

--
Perl5 Master Repository