In perl.git, the branch blead has been updated

<http://perl5.git.perl.org/perl.git/commitdiff/87a7cbadd8678833337412bca174d352a90db6d4?hp=6901b8d95792a0dcf07d5f09cc9eafb4b9fc6c66>

- Log -----------------------------------------------------------------
commit 87a7cbadd8678833337412bca174d352a90db6d4
Author: Ricardo Signes <[email protected]>
Date:   Thu Mar 20 10:00:56 2014 -0400

    sync-with-cpan: allow digits after -TRIAL
-----------------------------------------------------------------------

Summary of changes:
 Porting/sync-with-cpan | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/Porting/sync-with-cpan b/Porting/sync-with-cpan
index d436703..fdbc6ad 100755
--- a/Porting/sync-with-cpan
+++ b/Porting/sync-with-cpan
@@ -218,7 +218,7 @@ chdir "cpan";
 my  $pkg_dir      = $files[0];
     $pkg_dir      =~ s!.*/!!;
 
-my ($old_version) = $distribution =~ /-([0-9.]+(?:-TRIAL)?)\.tar\.gz/;
+my ($old_version) = $distribution =~ /-([0-9.]+(?:-TRIAL[0-9]*)?)\.tar\.gz/;
 
 my  $o_module     = $module;
 if ($cpan_mod =~ /-/ && $cpan_mod !~ /::/) {
@@ -267,7 +267,7 @@ unless ($tarball) {
 }
 else {
     $new_file     = $tarball;
-    $new_version  = $version // ($new_file =~ 
/-([0-9._]+(?:-TRIAL)?)\.tar\.gz/) [0];
+    $new_version  = $version // ($new_file =~ 
/-([0-9._]+(?:-TRIAL[0-9]*)?)\.tar\.gz/) [0];
 }
 
 my  $old_dir      = "$pkg_dir-$old_version";

--
Perl5 Master Repository

Reply via email to