In perl.git, the branch blead has been updated

<http://perl5.git.perl.org/perl.git/commitdiff/e959ddd43fd7ec139c6a38e535a15d362600fe44?hp=85b769704171cb40faee0cdff60865fbf100c4c0>

- Log -----------------------------------------------------------------
commit e959ddd43fd7ec139c6a38e535a15d362600fe44
Author: Steve Hay <[email protected]>
Date:   Wed Aug 8 08:47:51 2012 +0100

    Allow .tgz as a recognized suffix in core-cpan-diff
    otherwise Memoize-1.03.tgz gets skipped.

M       Porting/core-cpan-diff

commit 2760d9b4f0f41e87aa252c1f7da9bf059360e409
Author: Steve Hay <[email protected]>
Date:   Wed Aug 8 08:44:59 2012 +0100

    Note that core-cpan-diff always requires diff(1), even without --diff

M       Porting/core-cpan-diff
-----------------------------------------------------------------------

Summary of changes:
 Porting/core-cpan-diff |    6 +++++-
 1 files changed, 5 insertions(+), 1 deletions(-)

diff --git a/Porting/core-cpan-diff b/Porting/core-cpan-diff
index ac4f1c5..54110d8 100644
--- a/Porting/core-cpan-diff
+++ b/Porting/core-cpan-diff
@@ -58,7 +58,6 @@ Usage: $0 [opts] [ -d | -v | -x ] [ -a | module ... ]
 
 -d/--diff     Display file differences using diff(1), rather than just
               listing which files have changed.
-              The diff(1) command is assumed to be in your PATH.
 
 --diffopts    Options to pass to the diff command. Defaults to '-u'.
 
@@ -87,6 +86,10 @@ those in the perl source tree.
 
 Must be run from the root of the perl source tree.
 Module names must match the keys of %Modules in Maintainers.pl.
+
+The diff(1) command is assumed to be in your PATH and is used to diff files
+regardless of whether the --diff option has been chosen to display any file
+differences.
 HERE
     exit(1);
 }
@@ -652,6 +655,7 @@ sub get_distribution {
     my $path = catfile( $untar_dir, $filename );
 
     $path =~ s/\.tar\.gz$//
+      or $path =~ s/\.tgz$//
       or $path =~ s/\.zip$//
       or die
       "ERROR: downloaded file does not have a recognised suffix: $path\n";

--
Perl5 Master Repository

Reply via email to