Hello community,

here is the log from the commit of package perl-ExtUtils-Helpers for 
openSUSE:Factory checked in at 2014-03-18 16:21:29
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Comparing /work/SRC/openSUSE:Factory/perl-ExtUtils-Helpers (Old)
 and      /work/SRC/openSUSE:Factory/.perl-ExtUtils-Helpers.new (New)
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++

Package is "perl-ExtUtils-Helpers"

Changes:
--------
--- 
/work/SRC/openSUSE:Factory/perl-ExtUtils-Helpers/perl-ExtUtils-Helpers.changes  
    2013-06-06 15:02:47.000000000 +0200
+++ 
/work/SRC/openSUSE:Factory/.perl-ExtUtils-Helpers.new/perl-ExtUtils-Helpers.changes
 2014-03-18 16:21:42.000000000 +0100
@@ -1,0 +2,8 @@
+Mon Mar 17 08:29:24 UTC 2014 - [email protected]
+
+- updated to 0.022
+       Cleaned up remains of former functions
+       Skip IO layers on <5.8 for 5.6 compatability
+       Don't swallow pl2bat exceptions
+
+-------------------------------------------------------------------

Old:
----
  ExtUtils-Helpers-0.021.tar.gz

New:
----
  ExtUtils-Helpers-0.022.tar.gz

++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++

Other differences:
------------------
++++++ perl-ExtUtils-Helpers.spec ++++++
--- /var/tmp/diff_new_pack.pySq6Z/_old  2014-03-18 16:21:43.000000000 +0100
+++ /var/tmp/diff_new_pack.pySq6Z/_new  2014-03-18 16:21:43.000000000 +0100
@@ -1,7 +1,7 @@
 #
 # spec file for package perl-ExtUtils-Helpers
 #
-# Copyright (c) 2013 SUSE LINUX Products GmbH, Nuernberg, Germany.
+# Copyright (c) 2014 SUSE LINUX Products GmbH, Nuernberg, Germany.
 #
 # All modifications and additions to the file contributed by third parties
 # remain the property of their copyright owners, unless otherwise agreed
@@ -17,7 +17,7 @@
 
 
 Name:           perl-ExtUtils-Helpers
-Version:        0.021
+Version:        0.022
 Release:        0
 %define cpan_name ExtUtils-Helpers
 Summary:        Various portability utilities for module builders
@@ -30,9 +30,6 @@
 BuildRequires:  perl
 BuildRequires:  perl-macros
 BuildRequires:  perl(Module::Load)
-#BuildRequires: perl(ExtUtils::Helpers)
-#BuildRequires: perl(ExtUtils::Helpers::Unix)
-#BuildRequires: perl(ExtUtils::Helpers::Windows)
 Requires:       perl(Module::Load)
 %{perl_requires}
 

++++++ ExtUtils-Helpers-0.021.tar.gz -> ExtUtils-Helpers-0.022.tar.gz ++++++
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/ExtUtils-Helpers-0.021/Changes 
new/ExtUtils-Helpers-0.022/Changes
--- old/ExtUtils-Helpers-0.021/Changes  2013-05-06 14:57:38.000000000 +0200
+++ new/ExtUtils-Helpers-0.022/Changes  2014-03-07 13:27:19.000000000 +0100
@@ -1,5 +1,10 @@
 Revision history for ExtUtils-Helpers
 
+0.022     2014-03-07 13:27:09CET+0100 Europe/Amsterdam
+          Cleaned up remains of former functions
+          Skip IO layers on <5.8 for 5.6 compatability
+          Don't swallow pl2bat exceptions
+
 0.021     2013-05-06 14:57:29 Europe/Amsterdam
           Always use the right environmental variable
           Use configuration provided manpage extension
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/ExtUtils-Helpers-0.021/MANIFEST 
new/ExtUtils-Helpers-0.022/MANIFEST
--- old/ExtUtils-Helpers-0.021/MANIFEST 2013-05-06 14:57:38.000000000 +0200
+++ new/ExtUtils-Helpers-0.022/MANIFEST 2014-03-07 13:27:19.000000000 +0100
@@ -1,3 +1,4 @@
+# This file was automatically generated by Dist::Zilla::Plugin::Manifest 
v5.011.
 Changes
 INSTALL
 LICENSE
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/ExtUtils-Helpers-0.021/META.json 
new/ExtUtils-Helpers-0.022/META.json
--- old/ExtUtils-Helpers-0.021/META.json        2013-05-06 14:57:38.000000000 
+0200
+++ new/ExtUtils-Helpers-0.022/META.json        2014-03-07 13:27:19.000000000 
+0100
@@ -5,7 +5,7 @@
       "Leon Timmermans <[email protected]>"
    ],
    "dynamic_config" : 0,
-   "generated_by" : "Dist::Zilla version 4.300033, CPAN::Meta::Converter 
version 2.130880",
+   "generated_by" : "Dist::Zilla version 5.011, CPAN::Meta::Converter version 
2.132830",
    "license" : [
       "perl_5"
    ],
@@ -30,7 +30,6 @@
       "runtime" : {
          "requires" : {
             "Carp" : "0",
-            "Config" : "0",
             "Exporter" : "5.57",
             "File::Basename" : "0",
             "File::Copy" : "0",
@@ -45,12 +44,32 @@
       "test" : {
          "requires" : {
             "Cwd" : "0",
-            "File::Find" : "0",
-            "File::Temp" : "0",
-            "Test::More" : "0"
+            "File::Spec" : "0",
+            "IO::Handle" : "0",
+            "IPC::Open3" : "0",
+            "Test::More" : "0",
+            "lib" : "0"
          }
       }
    },
+   "provides" : {
+      "ExtUtils::Helpers" : {
+         "file" : "lib/ExtUtils/Helpers.pm",
+         "version" : "0.022"
+      },
+      "ExtUtils::Helpers::Unix" : {
+         "file" : "lib/ExtUtils/Helpers/Unix.pm",
+         "version" : "0.022"
+      },
+      "ExtUtils::Helpers::VMS" : {
+         "file" : "lib/ExtUtils/Helpers/VMS.pm",
+         "version" : "0.022"
+      },
+      "ExtUtils::Helpers::Windows" : {
+         "file" : "lib/ExtUtils/Helpers/Windows.pm",
+         "version" : "0.022"
+      }
+   },
    "release_status" : "stable",
    "resources" : {
       "bugtracker" : {
@@ -60,9 +79,9 @@
       "repository" : {
          "type" : "git",
          "url" : "git://github.com/Leont/extutils-helpers.git",
-         "web" : "http://github.com/Leont/extutils-helpers";
+         "web" : "https://github.com/Leont/extutils-helpers";
       }
    },
-   "version" : "0.021"
+   "version" : "0.022"
 }
 
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/ExtUtils-Helpers-0.021/META.yml 
new/ExtUtils-Helpers-0.022/META.yml
--- old/ExtUtils-Helpers-0.021/META.yml 2013-05-06 14:57:38.000000000 +0200
+++ new/ExtUtils-Helpers-0.022/META.yml 2014-03-07 13:27:19.000000000 +0100
@@ -5,21 +5,35 @@
   - 'Leon Timmermans <[email protected]>'
 build_requires:
   Cwd: 0
-  File::Find: 0
-  File::Temp: 0
+  File::Spec: 0
+  IO::Handle: 0
+  IPC::Open3: 0
   Test::More: 0
+  lib: 0
 configure_requires:
   ExtUtils::MakeMaker: 6.30
 dynamic_config: 0
-generated_by: 'Dist::Zilla version 4.300033, CPAN::Meta::Converter version 
2.130880'
+generated_by: 'Dist::Zilla version 5.011, CPAN::Meta::Converter version 
2.132830'
 license: perl
 meta-spec:
   url: http://module-build.sourceforge.net/META-spec-v1.4.html
   version: 1.4
 name: ExtUtils-Helpers
+provides:
+  ExtUtils::Helpers:
+    file: lib/ExtUtils/Helpers.pm
+    version: 0.022
+  ExtUtils::Helpers::Unix:
+    file: lib/ExtUtils/Helpers/Unix.pm
+    version: 0.022
+  ExtUtils::Helpers::VMS:
+    file: lib/ExtUtils/Helpers/VMS.pm
+    version: 0.022
+  ExtUtils::Helpers::Windows:
+    file: lib/ExtUtils/Helpers/Windows.pm
+    version: 0.022
 requires:
   Carp: 0
-  Config: 0
   Exporter: 5.57
   File::Basename: 0
   File::Copy: 0
@@ -32,4 +46,4 @@
 resources:
   bugtracker: http://rt.cpan.org/Public/Dist/Display.html?Name=ExtUtils-Helpers
   repository: git://github.com/Leont/extutils-helpers.git
-version: 0.021
+version: 0.022
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/ExtUtils-Helpers-0.021/Makefile.PL 
new/ExtUtils-Helpers-0.022/Makefile.PL
--- old/ExtUtils-Helpers-0.021/Makefile.PL      2013-05-06 14:57:38.000000000 
+0200
+++ new/ExtUtils-Helpers-0.022/Makefile.PL      2014-03-07 13:27:19.000000000 
+0100
@@ -1,4 +1,5 @@
 
+# This file was automatically generated by Dist::Zilla::Plugin::MakeMaker 
v5.011.
 use strict;
 use warnings;
 
@@ -21,7 +22,6 @@
   "NAME" => "ExtUtils::Helpers",
   "PREREQ_PM" => {
     "Carp" => 0,
-    "Config" => 0,
     "Exporter" => "5.57",
     "File::Basename" => 0,
     "File::Copy" => 0,
@@ -33,41 +33,42 @@
   },
   "TEST_REQUIRES" => {
     "Cwd" => 0,
-    "File::Find" => 0,
-    "File::Temp" => 0,
-    "Test::More" => 0
+    "File::Spec" => 0,
+    "IO::Handle" => 0,
+    "IPC::Open3" => 0,
+    "Test::More" => 0,
+    "lib" => 0
   },
-  "VERSION" => "0.021",
+  "VERSION" => "0.022",
   "test" => {
     "TESTS" => "t/*.t"
   }
 );
 
 
-unless ( eval { ExtUtils::MakeMaker->VERSION(6.63_03) } ) {
-  my $tr = delete $WriteMakefileArgs{TEST_REQUIRES};
-  my $br = $WriteMakefileArgs{BUILD_REQUIRES};
-  for my $mod ( keys %$tr ) {
-    if ( exists $br->{$mod} ) {
-      $br->{$mod} = $tr->{$mod} if $tr->{$mod} > $br->{$mod};
-    }
-    else {
-      $br->{$mod} = $tr->{$mod};
-    }
-  }
-}
+my %FallbackPrereqs = (
+  "Carp" => 0,
+  "Cwd" => 0,
+  "Exporter" => "5.57",
+  "File::Basename" => 0,
+  "File::Copy" => 0,
+  "File::Spec" => 0,
+  "File::Spec::Functions" => 0,
+  "IO::Handle" => 0,
+  "IPC::Open3" => 0,
+  "Module::Load" => 0,
+  "Test::More" => 0,
+  "Text::ParseWords" => "3.24",
+  "lib" => 0,
+  "strict" => 0,
+  "warnings" => 0
+);
 
-unless ( eval { ExtUtils::MakeMaker->VERSION(6.56) } ) {
-  my $br = delete $WriteMakefileArgs{BUILD_REQUIRES};
-  my $pp = $WriteMakefileArgs{PREREQ_PM};
-  for my $mod ( keys %$br ) {
-    if ( exists $pp->{$mod} ) {
-      $pp->{$mod} = $br->{$mod} if $br->{$mod} > $pp->{$mod};
-    }
-    else {
-      $pp->{$mod} = $br->{$mod};
-    }
-  }
+
+unless ( eval { ExtUtils::MakeMaker->VERSION(6.63_03) } ) {
+  delete $WriteMakefileArgs{TEST_REQUIRES};
+  delete $WriteMakefileArgs{BUILD_REQUIRES};
+  $WriteMakefileArgs{PREREQ_PM} = \%FallbackPrereqs;
 }
 
 delete $WriteMakefileArgs{CONFIGURE_REQUIRES}
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/ExtUtils-Helpers-0.021/README 
new/ExtUtils-Helpers-0.022/README
--- old/ExtUtils-Helpers-0.021/README   2013-05-06 14:57:38.000000000 +0200
+++ new/ExtUtils-Helpers-0.022/README   2014-03-07 13:27:19.000000000 +0100
@@ -1,7 +1,7 @@
 
 
 This archive contains the distribution ExtUtils-Helpers,
-version 0.021:
+version 0.022:
 
   Various portability utilities for module builders
 
@@ -11,3 +11,5 @@
 the same terms as the Perl 5 programming language system itself.
 
 
+This README file was generated by Dist::Zilla::Plugin::Readme v5.011.
+
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/ExtUtils-Helpers-0.021/lib/ExtUtils/Helpers/Unix.pm 
new/ExtUtils-Helpers-0.022/lib/ExtUtils/Helpers/Unix.pm
--- old/ExtUtils-Helpers-0.021/lib/ExtUtils/Helpers/Unix.pm     2013-05-06 
14:57:38.000000000 +0200
+++ new/ExtUtils-Helpers-0.022/lib/ExtUtils/Helpers/Unix.pm     2014-03-07 
13:27:19.000000000 +0100
@@ -1,7 +1,5 @@
 package ExtUtils::Helpers::Unix;
-{
-  $ExtUtils::Helpers::Unix::VERSION = '0.021';
-}
+$ExtUtils::Helpers::Unix::VERSION = '0.022';
 use strict;
 use warnings FATAL => 'all';
 
@@ -12,14 +10,16 @@
 use Config;
 use Text::ParseWords 3.24 qw/shellwords/;
 
+my $layer = $] >= 5.008001 ? ":raw" : "";
+
 sub make_executable {
        my $filename = shift;
        my $current_mode = (stat $filename)[2] + 0;
        if (-T $filename) {
-               open my $fh, '<:raw', $filename;
+               open my $fh, "<$layer", $filename;
                my @lines = <$fh>;
                if (@lines and $lines[0] =~ s{ \A \#! \s* (?:/\S+/)? perl \b 
(.*) \z }{$Config{startperl}$1}xms) {
-                       open my $out, '>:raw', "$filename.new" or croak 
"Couldn't open $filename.new: $!";
+                       open my $out, ">$layer", "$filename.new" or croak 
"Couldn't open $filename.new: $!";
                        print $out @lines;
                        close $out;
                        rename $filename, "$filename.bak" or croak "Couldn't 
rename $filename to $filename.bak";
@@ -55,17 +55,19 @@
 
 # ABSTRACT: Unix specific helper bits
 
-
+__END__
 
 =pod
 
+=encoding UTF-8
+
 =head1 NAME
 
 ExtUtils::Helpers::Unix - Unix specific helper bits
 
 =head1 VERSION
 
-version 0.021
+version 0.022
 
 =for Pod::Coverage make_executable
 split_like_shell
@@ -93,7 +95,3 @@
 the same terms as the Perl 5 programming language system itself.
 
 =cut
-
-
-__END__
-
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/ExtUtils-Helpers-0.021/lib/ExtUtils/Helpers/VMS.pm 
new/ExtUtils-Helpers-0.022/lib/ExtUtils/Helpers/VMS.pm
--- old/ExtUtils-Helpers-0.021/lib/ExtUtils/Helpers/VMS.pm      2013-05-06 
14:57:38.000000000 +0200
+++ new/ExtUtils-Helpers-0.022/lib/ExtUtils/Helpers/VMS.pm      2014-03-07 
13:27:19.000000000 +0100
@@ -1,7 +1,5 @@
 package ExtUtils::Helpers::VMS;
-{
-  $ExtUtils::Helpers::VMS::VERSION = '0.021';
-}
+$ExtUtils::Helpers::VMS::VERSION = '0.022';
 use strict;
 use warnings FATAL => 'all';
 
@@ -90,17 +88,19 @@
 
 # ABSTRACT: VMS specific helper bits
 
-
+__END__
 
 =pod
 
+=encoding UTF-8
+
 =head1 NAME
 
 ExtUtils::Helpers::VMS - VMS specific helper bits
 
 =head1 VERSION
 
-version 0.021
+version 0.022
 
 =for Pod::Coverage make_executable
 detildefy
@@ -127,7 +127,3 @@
 the same terms as the Perl 5 programming language system itself.
 
 =cut
-
-
-__END__
-
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' 
old/ExtUtils-Helpers-0.021/lib/ExtUtils/Helpers/Windows.pm 
new/ExtUtils-Helpers-0.022/lib/ExtUtils/Helpers/Windows.pm
--- old/ExtUtils-Helpers-0.021/lib/ExtUtils/Helpers/Windows.pm  2013-05-06 
14:57:38.000000000 +0200
+++ new/ExtUtils-Helpers-0.022/lib/ExtUtils/Helpers/Windows.pm  2014-03-07 
13:27:19.000000000 +0100
@@ -1,7 +1,5 @@
 package ExtUtils::Helpers::Windows;
-{
-  $ExtUtils::Helpers::Windows::VERSION = '0.021';
-}
+$ExtUtils::Helpers::Windows::VERSION = '0.022';
 use strict;
 use warnings FATAL => 'all';
 
@@ -14,10 +12,7 @@
 sub make_executable {
        my $script = shift;
        if (-T $script && $script !~ / \. (?:bat|cmd) $ /x) {
-               my $out = eval { _pl2bat(in => $script, update => 1) };
-               if ($@) {
-                       carp "WARNING: Unable to convert file '$script' to an 
executable script:\n$@";
-               }
+               _pl2bat(in => $script, update => 1);
        }
        return;
 }
@@ -177,17 +172,19 @@
 
 # ABSTRACT: Windows specific helper bits
 
-
 __END__
+
 =pod
 
+=encoding UTF-8
+
 =head1 NAME
 
 ExtUtils::Helpers::Windows - Windows specific helper bits
 
 =head1 VERSION
 
-version 0.021
+version 0.022
 
 =for Pod::Coverage make_executable
 split_like_shell
@@ -215,4 +212,3 @@
 the same terms as the Perl 5 programming language system itself.
 
 =cut
-
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/ExtUtils-Helpers-0.021/lib/ExtUtils/Helpers.pm 
new/ExtUtils-Helpers-0.022/lib/ExtUtils/Helpers.pm
--- old/ExtUtils-Helpers-0.021/lib/ExtUtils/Helpers.pm  2013-05-06 
14:57:38.000000000 +0200
+++ new/ExtUtils-Helpers-0.022/lib/ExtUtils/Helpers.pm  2014-03-07 
13:27:19.000000000 +0100
@@ -1,7 +1,5 @@
 package ExtUtils::Helpers;
-{
-  $ExtUtils::Helpers::VERSION = '0.021';
-}
+$ExtUtils::Helpers::VERSION = '0.022';
 use strict;
 use warnings FATAL => 'all';
 use Exporter 5.57 'import';
@@ -11,7 +9,7 @@
 use File::Spec::Functions qw/splitpath canonpath abs2rel splitdir/;
 use Module::Load;
 
-our @EXPORT_OK = qw/build_script make_executable split_like_shell 
man1_pagename man3_pagename detildefy/;
+our @EXPORT_OK = qw/make_executable split_like_shell man1_pagename 
man3_pagename detildefy/;
 
 BEGIN {
        my %impl_for = ( MSWin32 => 'Windows', VMS => 'VMS');
@@ -46,21 +44,23 @@
 
 # ABSTRACT: Various portability utilities for module builders
 
-
 __END__
+
 =pod
 
+=encoding utf-8
+
 =head1 NAME
 
 ExtUtils::Helpers - Various portability utilities for module builders
 
 =head1 VERSION
 
-version 0.021
+version 0.022
 
 =head1 SYNOPSIS
 
- use ExtUtils::Helpers qw/build_script make_executable split_like_shell/;
+ use ExtUtils::Helpers qw/make_executable split_like_shell/;
 
  unshift @ARGV, split_like_shell($ENV{PROGRAM_OPTS});
  write_script_to('Build');
@@ -72,10 +72,6 @@
 
 =head1 FUNCTIONS
 
-=head2 build_script()
-
-This function returns the appropriate name for the Build script on the local 
platform.
-
 =head2 make_executable($filename)
 
 This makes a perl script executable.
@@ -96,12 +92,6 @@
 
 Returns the man page filename for a Perl library.
 
-=head2 manify($input_filename, $output_file, $section, $opts)
-
-Create a manpage for the script in C<$input_filename> as C<$output_file> in 
section C<$section>
-
-=encoding utf-8
-
 =head1 ACKNOWLEDGEMENTS
 
 Olivier Mengué and Christian Walde made C<make_executable> work on Windows.
@@ -128,4 +118,3 @@
 the same terms as the Perl 5 programming language system itself.
 
 =cut
-
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/ExtUtils-Helpers-0.021/t/00-compile.t 
new/ExtUtils-Helpers-0.022/t/00-compile.t
--- old/ExtUtils-Helpers-0.021/t/00-compile.t   2013-05-06 14:57:38.000000000 
+0200
+++ new/ExtUtils-Helpers-0.022/t/00-compile.t   2014-03-07 13:27:19.000000000 
+0100
@@ -1,73 +1,51 @@
-#!perl
-
 use strict;
 use warnings;
 
-use Test::More;
+# this test was generated with Dist::Zilla::Plugin::Test::Compile 2.036
 
+use Test::More  tests => 4 + ($ENV{AUTHOR_TESTING} ? 1 : 0);
 
 
-use File::Find;
-use File::Temp qw{ tempdir };
 
-my @modules;
-find(
-  sub {
-    return if $File::Find::name !~ /\.pm\z/;
-    my $found = $File::Find::name;
-    $found =~ s{^lib/}{};
-    $found =~ s{[/\\]}{::}g;
-    $found =~ s/\.pm$//;
-    # nothing to skip
-    push @modules, $found;
-  },
-  'lib',
+my @module_files = (
+    'ExtUtils/Helpers.pm',
+    'ExtUtils/Helpers/Unix.pm',
+    'ExtUtils/Helpers/VMS.pm',
+    'ExtUtils/Helpers/Windows.pm'
 );
 
-sub _find_scripts {
-    my $dir = shift @_;
 
-    my @found_scripts = ();
-    find(
-      sub {
-        return unless -f;
-        my $found = $File::Find::name;
-        # nothing to skip
-        open my $FH, '<', $_ or do {
-          note( "Unable to open $found in ( $! ), skipping" );
-          return;
-        };
-        my $shebang = <$FH>;
-        return unless $shebang =~ /^#!.*?\bperl\b\s*$/;
-        push @found_scripts, $found;
-      },
-      $dir,
-    );
 
-    return @found_scripts;
-}
+# no fake home requested
 
-my @scripts;
-do { push @scripts, _find_scripts($_) if -d $_ }
-    for qw{ bin script scripts };
+my $inc_switch = q[-Mblib];
 
-my $plan = scalar(@modules) + scalar(@scripts);
-$plan ? (plan tests => $plan) : (plan skip_all => "no tests to run");
+use File::Spec;
+use IPC::Open3;
+use IO::Handle;
 
+my @warnings;
+for my $lib (@module_files)
 {
-    # fake home for cpan-testers
-    # no fake requested ## local $ENV{HOME} = tempdir( CLEANUP => 1 );
-
-    like( qx{ $^X -Ilib -e "require $_; print '$_ ok'" }, qr/^\s*$_ ok/s, "$_ 
loaded ok" )
-        for sort @modules;
-
-    SKIP: {
-        eval "use Test::Script 1.05; 1;";
-        skip "Test::Script needed to test script compilation", 
scalar(@scripts) if $@;
-        foreach my $file ( @scripts ) {
-            my $script = $file;
-            $script =~ s!.*/!!;
-            script_compiles( $file, "$script script compiles" );
-        }
+    # see L<perlfaq8/How can I capture STDERR from an external command?>
+    open my $stdin, '<', File::Spec->devnull or die "can't open devnull: $!";
+    my $stderr = IO::Handle->new;
+
+    my $pid = open3($stdin, '>&STDERR', $stderr, $^X, $inc_switch, '-e', 
"require q[$lib]");
+    binmode $stderr, ':crlf' if $^O eq 'MSWin32';
+    my @_warnings = <$stderr>;
+    waitpid($pid, 0);
+    is($?, 0, "$lib loaded ok");
+
+    if (@_warnings)
+    {
+        warn @_warnings;
+        push @warnings, @_warnings;
     }
 }
+
+
+
+is(scalar(@warnings), 0, 'no warnings found') if $ENV{AUTHOR_TESTING};
+
+
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/ExtUtils-Helpers-0.021/t/release-pod-coverage.t 
new/ExtUtils-Helpers-0.022/t/release-pod-coverage.t
--- old/ExtUtils-Helpers-0.021/t/release-pod-coverage.t 2013-05-06 
14:57:38.000000000 +0200
+++ new/ExtUtils-Helpers-0.022/t/release-pod-coverage.t 2014-03-07 
13:27:19.000000000 +0100
@@ -7,6 +7,7 @@
   }
 }
 
+# This file was automatically generated by 
Dist::Zilla::Plugin::PodCoverageTests.
 
 use Test::More;
 
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/ExtUtils-Helpers-0.021/t/release-pod-syntax.t 
new/ExtUtils-Helpers-0.022/t/release-pod-syntax.t
--- old/ExtUtils-Helpers-0.021/t/release-pod-syntax.t   2013-05-06 
14:57:38.000000000 +0200
+++ new/ExtUtils-Helpers-0.022/t/release-pod-syntax.t   2014-03-07 
13:27:19.000000000 +0100
@@ -7,6 +7,7 @@
   }
 }
 
+# This file was automatically generated by Dist::Zilla::Plugin::PodSyntaxTests.
 use Test::More;
 
 eval "use Test::Pod 1.41";

-- 
To unsubscribe, e-mail: [email protected]
For additional commands, e-mail: [email protected]

Reply via email to