In perl.git, the branch blead has been updated

<http://perl5.git.perl.org/perl.git/commitdiff/c99cfaa7c4ced6145d9642cd15da5bb2ea4ad19e?hp=cf203c62f1150b565f11422be478d513ad57902b>

- Log -----------------------------------------------------------------
commit c99cfaa7c4ced6145d9642cd15da5bb2ea4ad19e
Author: Florian Ragwitz <r...@debian.org>
Date:   Wed Sep 8 09:43:48 2010 +0200

    Stop corelist.pl from updating DESCRIPTION

M       Porting/corelist.pl

commit 1af4ba53d243c27d3642a7ccd0499dcb34ed7cb2
Author: Florian Ragwitz <r...@debian.org>
Date:   Wed Sep 8 08:50:15 2010 +0200

    This is a function, not a method

M       Porting/corelist.pl
-----------------------------------------------------------------------

Summary of changes:
 Porting/corelist.pl |   10 +++++-----
 1 files changed, 5 insertions(+), 5 deletions(-)

diff --git a/Porting/corelist.pl b/Porting/corelist.pl
index f27102e..a2b7c1e 100755
--- a/Porting/corelist.pl
+++ b/Porting/corelist.pl
@@ -229,13 +229,13 @@ $corelist =~ s/^%bug_tracker .*? ;/$tracker/eismx;
 
 unless ( $corelist =~ /and $perl_vstring releases of perl/ ) {
     warn "Adding $perl_vstring to the list of perl versions covered by 
Module::CoreList\n";
-    $corelist =~ s/\s*and (.*?) releases of perl/, $1 and $perl_vstring 
releases of perl/ism;
+    $corelist =~ s/(currently covers (?:.*?))\s*and (.*?) releases of perl/$1, 
$2 and $perl_vstring releases of perl/ism;
 }
 
 unless (
-    $corelist =~ /^%released \s* = \s* \( 
-        .*? 
-        $perl_vnum => .*? 
+    $corelist =~ /^%released \s* = \s* \(
+        .*?
+        $perl_vnum => .*?
         \);/ismx
     )
 {
@@ -260,7 +260,7 @@ sub fetch_url {
     my $url = shift;
     eval { require LWP::Simple };
     if ( LWP::Simple->can('get') ) {
-        return LWP::Simple->get($url);
+        return LWP::Simple::get($url);
     } elsif (`which curl`) {
         return `curl -s $url`;
     } elsif (`which wget`) {

--
Perl5 Master Repository

Reply via email to