Hello community,
here is the log from the commit of package perl-IPC-Run for openSUSE:Factory
checked in at Mon Aug 3 19:39:49 CEST 2009.
--------
--- perl-IPC-Run/perl-IPC-Run.changes 2009-01-20 16:47:12.000000000 +0100
+++ /mounts/work_src_done/STABLE/perl-IPC-Run/perl-IPC-Run.changes 2009-08-03 17:11:58.000000000 +0200
@@ -1,0 +2,7 @@
+Mon Aug 3 16:10:11 CEST 2009 - anicka@suse.cz
+
+- update to 0.84
+ * Add darwin to the list of known-bad platforms
+ * Switch from command.com to cmd.exe so we work on 2008 or newer.
+
+-------------------------------------------------------------------
calling whatdependson for head-i586
Old:
----
IPC-Run-0.82-path.diff
IPC-Run-0.82.tar.bz2
New:
----
IPC-Run-0.84-path.diff
IPC-Run-0.84.tar.bz2
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Other differences:
------------------
++++++ perl-IPC-Run.spec ++++++
--- /var/tmp/diff_new_pack.AIRg8r/_old 2009-08-03 19:39:42.000000000 +0200
+++ /var/tmp/diff_new_pack.AIRg8r/_new 2009-08-03 19:39:42.000000000 +0200
@@ -1,5 +1,5 @@
#
-# spec file for package perl-IPC-Run (Version 0.82)
+# spec file for package perl-IPC-Run (Version 0.84)
#
# Copyright (c) 2009 SUSE LINUX Products GmbH, Nuernberg, Germany.
#
@@ -19,12 +19,12 @@
Name: perl-IPC-Run
-Version: 0.82
+Version: 0.84
Release: 1
Requires: perl = %{perl_version}
AutoReqProv: on
Group: Development/Libraries/Perl
-License: Artistic License; GPL v2 or later
+License: Artistic License .. ; GPL v2 or later
Url: http://cpan.org/modules/by-module/IPC/
Summary: System() and Background Procs with Piping, Redirs, and PTYs
Source: IPC-Run-%{version}.tar.bz2
++++++ IPC-Run-0.82-path.diff -> IPC-Run-0.84-path.diff ++++++
++++++ IPC-Run-0.82.tar.bz2 -> IPC-Run-0.84.tar.bz2 ++++++
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/IPC-Run-0.82/Changes new/IPC-Run-0.84/Changes
--- old/IPC-Run-0.82/Changes 2008-12-18 12:58:08.000000000 +0100
+++ new/IPC-Run-0.84/Changes 2009-07-13 02:57:41.000000000 +0200
@@ -1,5 +1,11 @@
Revision history for Perl extension IPC::Run
+0.84 Mon 13 Jul 2009
+ - Add darwin to the list of known-bad platforms
+
+0.83 Fri 10 Jul 2009
+ - Switch from command.com to cmd.exe so we work on 2008 or newer.
+
0.82 Thu 18 Dec 2008
- Moving changes in 0.81_01 to a production release
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/IPC-Run-0.82/MANIFEST new/IPC-Run-0.84/MANIFEST
--- old/IPC-Run-0.82/MANIFEST 2008-12-18 12:59:38.000000000 +0100
+++ new/IPC-Run-0.84/MANIFEST 2009-07-13 02:59:15.000000000 +0200
@@ -21,6 +21,9 @@
Makefile.PL
MANIFEST This list of files
README
+t/97_meta.t
+t/98_pod.t
+t/99_pmv.t
t/adopt.t
t/binmode.t
t/bogus.t
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/IPC-Run-0.82/META.yml new/IPC-Run-0.84/META.yml
--- old/IPC-Run-0.82/META.yml 2008-12-18 12:59:38.000000000 +0100
+++ new/IPC-Run-0.84/META.yml 2009-07-13 02:59:14.000000000 +0200
@@ -1,20 +1,22 @@
--- #YAML:1.0
name: IPC-Run
-version: 0.82
-abstract: ~
+version: 0.84
+abstract: system() and background procs w/ piping, redirs, ptys (Unix, Win32)
author: []
license: unknown
distribution_type: module
configure_requires:
ExtUtils::MakeMaker: 0
+build_requires:
+ ExtUtils::MakeMaker: 0
requires:
- IO::Pty: 1.00
+ IO::Pty: 1.08
Test::More: 0.47
no_index:
directory:
- t
- inc
-generated_by: ExtUtils::MakeMaker version 6.48
+generated_by: ExtUtils::MakeMaker version 6.50
meta-spec:
url: http://module-build.sourceforge.net/META-spec-v1.4.html
version: 1.4
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/IPC-Run-0.82/Makefile.PL new/IPC-Run-0.84/Makefile.PL
--- old/IPC-Run-0.82/Makefile.PL 2008-12-18 12:58:08.000000000 +0100
+++ new/IPC-Run-0.84/Makefile.PL 2009-07-13 02:57:41.000000000 +0200
@@ -9,10 +9,10 @@
warn("WARNING: \"IO::Pty not found\".\nWARNING: 'pty>' will not work.\n\n");
last;
}
- $PREREQ_PM{'IO::Pty'} = '1.00';
+ $PREREQ_PM{'IO::Pty'} = '1.08';
}
} else {
- $PREREQ_PM{'Win32::Process'} = 0;
+ $PREREQ_PM{'Win32::Process'} = '0.14';
if ( ! eval "use Socket qw( IPPROTO_TCP TCP_NODELAY ); 1" ) {
warn <<"TOHERE";
$@
@@ -41,6 +41,7 @@
WriteMakefile(
NAME => 'IPC::Run',
+ ABSTRACT => 'system() and background procs w/ piping, redirs, ptys (Unix, Win32)',
VERSION_FROM => 'lib/IPC/Run.pm',
PREREQ_PM => {
Test::More => '0.47',
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/IPC-Run-0.82/README new/IPC-Run-0.84/README
--- old/IPC-Run-0.82/README 2008-12-18 12:58:08.000000000 +0100
+++ new/IPC-Run-0.84/README 2009-07-13 02:57:41.000000000 +0200
@@ -15,6 +15,7 @@
run \@cmd, '<', "in.txt", \&out, \&err or die "cat: $?"
run \@cat, '<', "in.txt", '>>', "out.txt", '2>>', "err.txt";
+
# Redirecting using psuedo-terminals instad of pipes.
run \@cat, 'pty>', \$out_and_err;
@@ -409,7 +410,7 @@
processes are also specified:
run io( "infile", ">", \$in ), io( "outfile", "<", \$in );
-
+
as can IPC::Run::Timer objects:
run \@cmd, io( "outfile", "<", \$in ), timeout( 10 );
@@ -485,7 +486,7 @@
leading '|' consumes descriptor 0, so this works as expected.
run \@cmd1, \$in, '|', \@cmd2, \$out;
-
+
The parameter following a redirection operator can be a scalar ref, a
subroutine ref, a file name, an open filehandle, or a closed filehandle.
@@ -666,7 +667,7 @@
pipe, N>pipe P Pipe opens H for caller to read, write, close.
-
+
'N' and 'M' are placeholders for integer file descriptor numbers. The
terms 'input' and 'output' are from the child process's perspective.
@@ -714,7 +715,7 @@
run \@a, *IN; ## INVALID
run \@a, '<', *IN; ## BUGGY: Reads file named like "*main::A"
-
+
because perl passes a scalar containing a string that looks like
"*main::A" to &run, and &run can't tell the difference between that
and a redirection operator or a file name. &run guarantees that any
@@ -1185,6 +1186,7 @@
kill all the children. Call "<$h-"kill_kill>> in this case if you
care. This differs from the behavior of "run".
+ result
$h->result;
Returns the first non-zero result code (ie $? >> 8). See
@@ -1700,7 +1702,7 @@
Barrie Slaymaker
COPYRIGHT
- Some parts copyright 2008 Adam Kennedy.
+ Some parts copyright 2008 - 2009 Adam Kennedy.
Copyright 1999 Barrie Slaymaker.
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/IPC-Run-0.82/lib/IPC/Run/Debug.pm new/IPC-Run-0.84/lib/IPC/Run/Debug.pm
--- old/IPC-Run-0.82/lib/IPC/Run/Debug.pm 2008-12-18 12:58:08.000000000 +0100
+++ new/IPC-Run-0.84/lib/IPC/Run/Debug.pm 2009-07-13 02:57:41.000000000 +0200
@@ -70,7 +70,7 @@
use Exporter;
use vars qw{$VERSION @ISA @EXPORT @EXPORT_OK %EXPORT_TAGS};
BEGIN {
- $VERSION = '0.82';
+ $VERSION = '0.84';
@ISA = qw( Exporter );
@EXPORT = qw(
_debug
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/IPC-Run-0.82/lib/IPC/Run/IO.pm new/IPC-Run-0.84/lib/IPC/Run/IO.pm
--- old/IPC-Run-0.82/lib/IPC/Run/IO.pm 2008-12-18 12:58:08.000000000 +0100
+++ new/IPC-Run-0.84/lib/IPC/Run/IO.pm 2009-07-13 02:57:41.000000000 +0200
@@ -83,7 +83,7 @@
use vars qw{$VERSION};
BEGIN {
- $VERSION = '0.82';
+ $VERSION = '0.84';
if ( Win32_MODE ) {
eval "use IPC::Run::Win32Helper; require IPC::Run::Win32IO; 1"
or ( $@ && die ) or die "$!";
@@ -220,6 +220,10 @@
return $self;
}
+=pod
+
+=over
+
=item filename
Gets/sets the filename. Returns the value after the name change, if
@@ -233,6 +237,8 @@
return $self->{FILENAME};
}
+=pod
+
=item init
Does initialization required before this can be run. This includes open()ing
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/IPC-Run-0.82/lib/IPC/Run/Timer.pm new/IPC-Run-0.84/lib/IPC/Run/Timer.pm
--- old/IPC-Run-0.82/lib/IPC/Run/Timer.pm 2008-12-18 12:58:08.000000000 +0100
+++ new/IPC-Run-0.84/lib/IPC/Run/Timer.pm 2009-07-13 02:57:41.000000000 +0200
@@ -163,7 +163,7 @@
use Exporter;
use vars qw( $VERSION @ISA @EXPORT_OK %EXPORT_TAGS );
BEGIN {
- $VERSION = '0.82';
+ $VERSION = '0.84';
@ISA = qw( Exporter );
@EXPORT_OK = qw(
check
@@ -675,6 +675,8 @@
=pod
+=back
+
=head1 TODO
use Time::HiRes; if it's present.
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/IPC-Run-0.82/lib/IPC/Run/Win32Helper.pm new/IPC-Run-0.84/lib/IPC/Run/Win32Helper.pm
--- old/IPC-Run-0.82/lib/IPC/Run/Win32Helper.pm 2008-12-18 12:58:08.000000000 +0100
+++ new/IPC-Run-0.84/lib/IPC/Run/Win32Helper.pm 2009-07-13 02:57:41.000000000 +0200
@@ -24,7 +24,7 @@
use IO::Handle;
use vars qw{ $VERSION @ISA @EXPORT };
BEGIN {
- $VERSION = '0.82';
+ $VERSION = '0.84';
@ISA = qw( Exporter );
@EXPORT = qw(
win32_spawn
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/IPC-Run-0.82/lib/IPC/Run/Win32IO.pm new/IPC-Run-0.84/lib/IPC/Run/Win32IO.pm
--- old/IPC-Run-0.82/lib/IPC/Run/Win32IO.pm 2008-12-18 12:58:08.000000000 +0100
+++ new/IPC-Run-0.84/lib/IPC/Run/Win32IO.pm 2009-07-13 02:57:41.000000000 +0200
@@ -31,7 +31,7 @@
use vars qw{$VERSION};
BEGIN {
- $VERSION = '0.82';
+ $VERSION = '0.84';
}
use Socket qw( IPPROTO_TCP TCP_NODELAY );
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/IPC-Run-0.82/lib/IPC/Run/Win32Pump.pm new/IPC-Run-0.84/lib/IPC/Run/Win32Pump.pm
--- old/IPC-Run-0.82/lib/IPC/Run/Win32Pump.pm 2008-12-18 12:58:08.000000000 +0100
+++ new/IPC-Run-0.84/lib/IPC/Run/Win32Pump.pm 2009-07-13 02:57:41.000000000 +0200
@@ -29,7 +29,7 @@
use strict;
use vars qw{$VERSION};
BEGIN {
- $VERSION = '0.82';
+ $VERSION = '0.84';
}
use Win32API::File qw(
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/IPC-Run-0.82/lib/IPC/Run.pm new/IPC-Run-0.84/lib/IPC/Run.pm
--- old/IPC-Run-0.82/lib/IPC/Run.pm 2008-12-18 12:58:08.000000000 +0100
+++ new/IPC-Run-0.84/lib/IPC/Run.pm 2009-07-13 02:57:41.000000000 +0200
@@ -1005,15 +1005,13 @@
=head1 ROUTINES
-=over
-
=cut
use strict;
use Exporter ();
use vars qw{$VERSION @ISA @FILTER_IMP @FILTERS @API @EXPORT_OK %EXPORT_TAGS};
BEGIN {
- $VERSION = '0.82';
+ $VERSION = '0.84';
@ISA = qw{ Exporter };
## We use @EXPORT for the end user's convenience: there's only one function
@@ -1403,6 +1401,8 @@
=pod
+=over
+
=item run
Run takes a harness or harness specification and runs it, pumping
@@ -1648,10 +1648,10 @@
# if $options && defined $options->{debug};
my @args;
-
if ( @_ == 1 && ! ref $_[0] ) {
if ( Win32_MODE ) {
- @args = ( [ qw( command /c ), win32_parse_cmd_line $_[0] ] );
+ my $command = $ENV{ComSpec} || 'cmd';
+ @args = ( [ $command, '/c', win32_parse_cmd_line $_[0] ] );
}
else {
@args = ( [ qw( sh -c ), @_ ] );
@@ -3459,6 +3459,7 @@
}
=pod
+
=item result
$h->result;
@@ -4353,7 +4354,7 @@
=head1 COPYRIGHT
-Some parts copyright 2008 Adam Kennedy.
+Some parts copyright 2008 - 2009 Adam Kennedy.
Copyright 1999 Barrie Slaymaker.
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/IPC-Run-0.82/t/97_meta.t new/IPC-Run-0.84/t/97_meta.t
--- old/IPC-Run-0.82/t/97_meta.t 1970-01-01 01:00:00.000000000 +0100
+++ new/IPC-Run-0.84/t/97_meta.t 2009-07-13 02:57:41.000000000 +0200
@@ -0,0 +1,27 @@
+#!/usr/bin/perl
+
+# Test that our META.yml file matches the current specification.
+
+use strict;
+BEGIN {
+ $| = 1;
+ $^W = 1;
+}
+
+my $MODULE = 'Test::CPAN::Meta 0.12';
+
+# Don't run tests for installs
+use Test::More;
+unless ( $ENV{AUTOMATED_TESTING} or $ENV{RELEASE_TESTING} ) {
+ plan( skip_all => "Author tests not required for installation" );
+}
+
+# Load the testing module
+eval "use $MODULE";
+if ( $@ ) {
+ $ENV{RELEASE_TESTING}
+ ? die( "Failed to load required release-testing module $MODULE" )
+ : plan( skip_all => "$MODULE not available for testing" );
+}
+
+meta_yaml_ok();
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/IPC-Run-0.82/t/98_pod.t new/IPC-Run-0.84/t/98_pod.t
--- old/IPC-Run-0.82/t/98_pod.t 1970-01-01 01:00:00.000000000 +0100
+++ new/IPC-Run-0.84/t/98_pod.t 2009-07-13 02:57:41.000000000 +0200
@@ -0,0 +1,32 @@
+#!/usr/bin/perl
+
+# Test that the syntax of our POD documentation is valid
+
+use strict;
+BEGIN {
+ $| = 1;
+ $^W = 1;
+}
+
+my @MODULES = (
+ 'Pod::Simple 3.07',
+ 'Test::Pod 1.26',
+);
+
+# Don't run tests for installs
+use Test::More;
+unless ( $ENV{AUTOMATED_TESTING} or $ENV{RELEASE_TESTING} ) {
+ plan( skip_all => "Author tests not required for installation" );
+}
+
+# Load the testing modules
+foreach my $MODULE ( @MODULES ) {
+ eval "use $MODULE";
+ if ( $@ ) {
+ $ENV{RELEASE_TESTING}
+ ? die( "Failed to load required release-testing module $MODULE" )
+ : plan( skip_all => "$MODULE not available for testing" );
+ }
+}
+
+all_pod_files_ok();
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/IPC-Run-0.82/t/99_pmv.t new/IPC-Run-0.84/t/99_pmv.t
--- old/IPC-Run-0.82/t/99_pmv.t 1970-01-01 01:00:00.000000000 +0100
+++ new/IPC-Run-0.84/t/99_pmv.t 2009-07-13 02:57:41.000000000 +0200
@@ -0,0 +1,32 @@
+#!/usr/bin/perl
+
+# Test that our declared minimum Perl version matches our syntax
+
+use strict;
+BEGIN {
+ $| = 1;
+ $^W = 1;
+}
+
+my @MODULES = (
+ 'Perl::MinimumVersion 1.20',
+ 'Test::MinimumVersion 0.008',
+);
+
+# Don't run tests for installs
+use Test::More;
+unless ( $ENV{AUTOMATED_TESTING} or $ENV{RELEASE_TESTING} ) {
+ plan( skip_all => "Author tests not required for installation" );
+}
+
+# Load the testing modules
+foreach my $MODULE ( @MODULES ) {
+ eval "use $MODULE";
+ if ( $@ ) {
+ $ENV{RELEASE_TESTING}
+ ? die( "Failed to load required release-testing module $MODULE" )
+ : plan( skip_all => "$MODULE not available for testing" );
+ }
+}
+
+all_minimum_version_from_metayml_ok();
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/IPC-Run-0.82/t/pty.t new/IPC-Run-0.84/t/pty.t
--- old/IPC-Run-0.82/t/pty.t 2008-12-18 12:58:08.000000000 +0100
+++ new/IPC-Run-0.84/t/pty.t 2009-07-13 02:57:41.000000000 +0200
@@ -99,7 +99,7 @@
## Older Perls can't ok( a, qr// ), so I manually do that here.
my $exp;
-my $platform_skip = $^O =~ /(?:aix|freebsd|openbsd)/ ? "$^O deadlocks on this test" : "";
+my $platform_skip = $^O =~ /(?:aix|freebsd|openbsd|darwin)/ ? "$^O deadlocks on this test" : "";
##
## stdin only
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/IPC-Run-0.82/t/run.t new/IPC-Run-0.84/t/run.t
--- old/IPC-Run-0.82/t/run.t 2008-12-18 12:58:09.000000000 +0100
+++ new/IPC-Run-0.84/t/run.t 2009-07-13 02:57:42.000000000 +0200
@@ -787,8 +787,8 @@
ok( $r );
ok( ! $? );
is( _map_fds, $fd_map );
-ok( $out =~ qr/^(?:HELLO World\n|Hello world\n){2}$/s );
-ok( $err =~ qr/^(?:[12]:Hello World.*){2}$/s );
+ok( $out =~ qr/^(?:HELLO World\n|Hello world\n){2}\z/s );
+ok( $err =~ qr/^(?:[12]:Hello World.*){2}\z/s );
##
## A few error cases...
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Remember to have fun...
--
To unsubscribe, e-mail: opensuse-commit+unsubscribe@opensuse.org
For additional commands, e-mail: opensuse-commit+help@opensuse.org