This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Upgrade parent from 0.225 to 0.226
authorSteve Hay <steve.m.hay@googlemail.com>
Wed, 31 Jul 2013 07:51:36 +0000 (08:51 +0100)
committerSteve Hay <steve.m.hay@googlemail.com>
Wed, 31 Jul 2013 07:51:36 +0000 (08:51 +0100)
Porting/Maintainers.pl
cpan/parent/lib/parent.pm
cpan/parent/t/parent.t
pod/perldelta.pod

index 18d3317..cf6834a 100755 (executable)
@@ -1307,7 +1307,7 @@ use File::Glob qw(:case);
 
     'parent' => {
         'MAINTAINER'   => 'corion',
-        'DISTRIBUTION' => 'CORION/parent-0.225.tar.gz',
+        'DISTRIBUTION' => 'CORION/parent-0.226.tar.gz',
         'FILES'        => q[cpan/parent],
         'UPSTREAM'     => undef,
     },
index 8f72db8..32f0d6c 100644 (file)
@@ -1,7 +1,7 @@
 package parent;
 use strict;
 use vars qw($VERSION);
-$VERSION = '0.225';
+$VERSION = '0.226';
 
 sub import {
     my $class = shift;
index 6ee4494..fd1722f 100644 (file)
@@ -56,12 +56,15 @@ is( $Eval1::VERSION, '1.01' );
 
 is( $Eval2::VERSION, '1.02' );
 
+my $expected= q{/^Can't locate reallyReAlLyNotexists.pm in \@INC \(\@INC contains:/};
+$expected= q{/^Can't locate reallyReAlLyNotexists.pm in \@INC \(you may need to install the reallyReAlLyNotexists module\) \(\@INC contains:/}
+    if 5.018 <= $];
 
 eval q{use parent 'reallyReAlLyNotexists'};
-like( $@, q{/^Can't locate reallyReAlLyNotexists.pm in \@INC \(you may need to install the reallyReAlLyNotexists module\) \(\@INC contains:/}, 'baseclass that does not exist');
+like( $@, $expected, 'baseclass that does not exist');
 
 eval q{use parent 'reallyReAlLyNotexists'};
-like( $@, q{/^Can't locate reallyReAlLyNotexists.pm in \@INC \(you may need to install the reallyReAlLyNotexists module\) \(\@INC contains:/}, '  still failing on 2nd load');
+like( $@, $expected, '  still failing on 2nd load');
 {
     my $warning;
     local $SIG{__WARN__} = sub { $warning = shift };
index 49ad289..c5c97cb 100644 (file)
@@ -148,6 +148,10 @@ under C<Useqq> has been improved. [perl #118933]
 
 =item *
 
+L<parent> has been upgraded from version 0.225 to 0.226.
+
+=item *
+
 L<Socket> has been upgraded from version 2.010 to 2.011.
 
 Handle FreeBSD (or other platforms) returning shorter AF_UNIX sockaddr