This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
fix a skip count in cpan/IPC-SysV/t/ipcsysv.t
authorTony Cook <tony@develop-help.com>
Tue, 8 Mar 2016 23:43:57 +0000 (10:43 +1100)
committerTony Cook <tony@develop-help.com>
Tue, 8 Mar 2016 23:43:57 +0000 (10:43 +1100)
reported upstream as https://rt.cpan.org/Ticket/Display.html?id=112827

Porting/Maintainers.pl
cpan/IPC-SysV/lib/IPC/Msg.pm
cpan/IPC-SysV/lib/IPC/Semaphore.pm
cpan/IPC-SysV/lib/IPC/SharedMem.pm
cpan/IPC-SysV/lib/IPC/SysV.pm
cpan/IPC-SysV/t/ipcsysv.t
t/porting/customized.dat

index b31a002..c392c16 100755 (executable)
@@ -689,6 +689,14 @@ use File::Glob qw(:case);
                 const-xs.inc
                 ),
         ],
+        'CUSTOMIZED' => [
+            # CPAN #118827
+           qw(t/ipcsysv.t
+               lib/IPC/Msg.pm
+               lib/IPC/Semaphore.pm
+               lib/IPC/SharedMem.pm
+               lib/IPC/SysV.pm),
+        ],
     },
 
     'JSON::PP' => {
index d3bfd5d..3c561e2 100644 (file)
@@ -15,7 +15,7 @@ use strict;
 use vars qw($VERSION);
 use Carp;
 
-$VERSION = '2.06';
+$VERSION = '2.06_01';
 
 # Figure out if we have support for native sized types
 my $N = do { my $foo = eval { pack "L!", 0 }; $@ ? '' : '!' };
index 492cc66..41f3ece 100644 (file)
@@ -16,7 +16,7 @@ use strict;
 use vars qw($VERSION);
 use Carp;
 
-$VERSION = '2.06';
+$VERSION = '2.06_01';
 
 # Figure out if we have support for native sized types
 my $N = do { my $foo = eval { pack "L!", 0 }; $@ ? '' : '!' };
index 407369b..335ade9 100644 (file)
@@ -15,7 +15,7 @@ use strict;
 use vars qw($VERSION);
 use Carp;
 
-$VERSION = '2.06';
+$VERSION = '2.06_01';
 
 # Figure out if we have support for native sized types
 my $N = do { my $foo = eval { pack "L!", 0 }; $@ ? '' : '!' };
index da576ed..e99f10f 100644 (file)
@@ -18,7 +18,7 @@ use Config;
 require Exporter;
 @ISA = qw(Exporter);
 
-$VERSION = '2.06';
+$VERSION = '2.06_01';
 
 # To support new constants, just add them to @EXPORT_OK
 # and the C/XS code will be generated automagically.
index c7a92ed..68d2a05 100644 (file)
@@ -266,7 +266,7 @@ SKIP: {
 }
 
 SKIP: {
-  skip('lacking d_shm', 10) unless
+  skip('lacking d_shm', 11) unless
       $Config{'d_shm'} eq 'define';
 
   use IPC::SysV qw(shmat shmdt memread memwrite ftok);
@@ -275,7 +275,7 @@ SKIP: {
 
   # Very first time called after machine is booted value may be 0 
   unless (defined $shm && $shm >= 0) {
-    skip(skip_or_die('shmget', $!), 10);
+    skip(skip_or_die('shmget', $!), 11);
   }
 
   pass("shm acquire");
index cddecf4..57e44e6 100644 (file)
@@ -36,6 +36,11 @@ ExtUtils::MakeMaker cpan/ExtUtils-MakeMaker/t/echo.t 37aec8f794c52e037540757eb5b
 ExtUtils::MakeMaker cpan/ExtUtils-MakeMaker/t/lib/MakeMaker/Test/NoXS.pm 371cdff1b2375017907cfbc9c8f4a31f5ad10582
 ExtUtils::MakeMaker cpan/ExtUtils-MakeMaker/t/prereq.t 53bda2c549fd13a6b6c13a070ca6bc79883081c0
 ExtUtils::MakeMaker cpan/ExtUtils-MakeMaker/t/vstrings.t 90035a2bdbf45f15b9c3196d072d7cba7e662871
+IPC::SysV cpan/IPC-SysV/lib/IPC/Msg.pm 88865a2c7a06351cf10e08addd077bbdea02fb60
+IPC::SysV cpan/IPC-SysV/lib/IPC/Semaphore.pm 04f0d11b7d0babf8e41ccc917cccecc4a3ff9050
+IPC::SysV cpan/IPC-SysV/lib/IPC/SharedMem.pm 85dea09a5bb625fc1fdda433909633fda05ea831
+IPC::SysV cpan/IPC-SysV/lib/IPC/SysV.pm 9a0d1c3dcd67321ef1322f29102a1bc7eb91c61c
+IPC::SysV cpan/IPC-SysV/t/ipcsysv.t ee2c95e846ea201afe13c9ec53b09cef62c8ac68
 Math::BigRat cpan/Math-BigRat/lib/Math/BigRat.pm 6eabc68e04f67694f6fe523e64eb013fc337ca5b
 Pod::Perldoc cpan/Pod-Perldoc/lib/Pod/Perldoc.pm fe0bc906fb74b69cfd3fb289316ba669d770d465
 Scalar-List-Utils cpan/Scalar-List-Utils/lib/List/Util.pm 3b501b7332480b34929bc4df5d48581df3307267