In perl.git, the branch blead has been updated

<http://perl5.git.perl.org/perl.git/commitdiff/265b802e9d45d64391dce5b985462518bc9ce514?hp=e8aa73ce41e760f83f0e01eed0121419b5436e8f>

- Log -----------------------------------------------------------------
commit 265b802e9d45d64391dce5b985462518bc9ce514
Author: Chris 'BinGOs' Williams <[email protected]>
Date:   Sun Mar 3 09:18:12 2013 +0000

    Update IPC-Cmd to CPAN version 0.80
    
      [DELTA]
    
      Changes for 0.80    Sat Mar  2 22:03:49 GMT 2013
      =================================================
      * Use File::Spec->path instead of relying on
        Config (William Orr)
-----------------------------------------------------------------------

Summary of changes:
 Porting/Maintainers.pl      |    2 +-
 cpan/IPC-Cmd/lib/IPC/Cmd.pm |    7 +++----
 2 files changed, 4 insertions(+), 5 deletions(-)

diff --git a/Porting/Maintainers.pl b/Porting/Maintainers.pl
index 74419aa..57ab853 100755
--- a/Porting/Maintainers.pl
+++ b/Porting/Maintainers.pl
@@ -1049,7 +1049,7 @@ use File::Glob qw(:case);
 
     'IPC::Cmd' => {
         'MAINTAINER'   => 'kane',
-        'DISTRIBUTION' => 'BINGOS/IPC-Cmd-0.78.tar.gz',
+        'DISTRIBUTION' => 'BINGOS/IPC-Cmd-0.80.tar.gz',
         'FILES'        => q[cpan/IPC-Cmd],
         'UPSTREAM'     => 'cpan',
     },
diff --git a/cpan/IPC-Cmd/lib/IPC/Cmd.pm b/cpan/IPC-Cmd/lib/IPC/Cmd.pm
index 37e6d1e..c3d18b5 100644
--- a/cpan/IPC-Cmd/lib/IPC/Cmd.pm
+++ b/cpan/IPC-Cmd/lib/IPC/Cmd.pm
@@ -17,7 +17,7 @@ BEGIN {
                         $INSTANCES $ALLOW_NULL_ARGS
                     ];
 
-    $VERSION        = '0.78';
+    $VERSION        = '0.80';
     $VERBOSE        = 0;
     $DEBUG          = 0;
     $WARN           = 1;
@@ -212,7 +212,6 @@ sub can_run {
         return $command if scalar $syms->getsym( uc $command );
     }
 
-    require Config;
     require File::Spec;
     require ExtUtils::MakeMaker;
 
@@ -223,7 +222,7 @@ sub can_run {
 
     } else {
         for my $dir (
-            (split /\Q$Config::Config{path_sep}\E/, $ENV{PATH}),
+            File::Spec->path,
             File::Spec->curdir
         ) {
             next if ! $dir || ! -d $dir;
@@ -1883,7 +1882,7 @@ special characters are escaped and passed as arguments 
instead of retaining
 their special meaning.
 
 However, if the command contained arguments that contained whitespace,
-stringifying the command would loose the significance of the whitespace.
+stringifying the command would lose the significance of the whitespace.
 Therefore, C<IPC::Cmd> will quote any arguments containing whitespace in your
 command if the command is passed as an arrayref and contains special 
characters.
 

--
Perl5 Master Repository

Reply via email to