In perl.git, the branch blead has been updated

<http://perl5.git.perl.org/perl.git/commitdiff/2b78b7715e1330aaceb5d16e6de25abbe8fde06c?hp=80b215cbddf12bec34cfa763645a8f8210afd962>

- Log -----------------------------------------------------------------
commit 2b78b7715e1330aaceb5d16e6de25abbe8fde06c
Author: Jos I. Boumans <[email protected]>
Date:   Mon May 4 10:19:10 2009 +0200

    Update IPC::Cmd to 0.44
-----------------------------------------------------------------------

Summary of changes:
 lib/IPC/Cmd.pm                 |    2 +-
 lib/IPC/Cmd/t/01_IPC-Cmd.t     |    2 +-
 lib/IPC/Cmd/t/src/x.tgz.packed |    2 +-
 3 files changed, 3 insertions(+), 3 deletions(-)

diff --git a/lib/IPC/Cmd.pm b/lib/IPC/Cmd.pm
index 41bcd4b..ae67401 100644
--- a/lib/IPC/Cmd.pm
+++ b/lib/IPC/Cmd.pm
@@ -16,7 +16,7 @@ BEGIN {
                         $USE_IPC_RUN $USE_IPC_OPEN3 $WARN
                     ];
 
-    $VERSION        = '0.42_01';
+    $VERSION        = '0.44';
     $VERBOSE        = 0;
     $DEBUG          = 0;
     $WARN           = 1;
diff --git a/lib/IPC/Cmd/t/01_IPC-Cmd.t b/lib/IPC/Cmd/t/01_IPC-Cmd.t
index 95a5ba6..e2b58d1 100644
--- a/lib/IPC/Cmd/t/01_IPC-Cmd.t
+++ b/lib/IPC/Cmd/t/01_IPC-Cmd.t
@@ -22,7 +22,7 @@ my $Have_IPC_Run    = $Class->can_use_ipc_run   || 0;
 my $Have_IPC_Open3  = $Class->can_use_ipc_open3 || 0;
 
 diag("IPC::Run: $Have_IPC_Run   IPC::Open3: $Have_IPC_Open3")
-    if (! exists($ENV{'PERL_CORE'}));
+    unless exists $ENV{'PERL_CORE'};
 
 local $IPC::Cmd::VERBOSE = $Verbose;
 local $IPC::Cmd::VERBOSE = $Verbose;
diff --git a/lib/IPC/Cmd/t/src/x.tgz.packed b/lib/IPC/Cmd/t/src/x.tgz.packed
index 1986b94..ccbaada 100644
--- a/lib/IPC/Cmd/t/src/x.tgz.packed
+++ b/lib/IPC/Cmd/t/src/x.tgz.packed
@@ -10,7 +10,7 @@ To recreate it use the following command:
 
      uupacktool.pl -p lib/IPC/Cmd/t/src/x.tgz lib/IPC/Cmd/t/src/x.tgz.packed
 
-Created at Sat Dec 13 18:16:56 2008
+Created at Mon May  4 10:16:10 2009
 #########################################################################
 __UU__
 M'XL(`````````^W.NPW"0!!%T2EE2YC%:[N>#7""1,"G?QM##!&.SDE&(]W@

--
Perl5 Master Repository

Reply via email to