diff options
author | Ricardo Signes <rjbs@cpan.org> | 2012-05-20 19:10:11 -0400 |
---|---|---|
committer | Ricardo Signes <rjbs@cpan.org> | 2012-05-20 19:18:16 -0400 |
commit | 559550aea97a776e8aa784032f554f5a717ac19b (patch) | |
tree | 36b781a2bc31dfb0a330eb80b8f05eb956c08cbe | |
parent | 4c4c16b26f32602d10a419d41d88afe4fd8f585d (diff) | |
download | perl-559550aea97a776e8aa784032f554f5a717ac19b.tar.gz |
include some more data in new-perldelta output
-rw-r--r-- | Porting/new-perldelta.pl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Porting/new-perldelta.pl b/Porting/new-perldelta.pl index d4fb5936ee..dc4c136109 100644 --- a/Porting/new-perldelta.pl +++ b/Porting/new-perldelta.pl @@ -88,7 +88,7 @@ my $pod_master = slurp_or_die($filename); $pod_master =~ s{^(\s*perl5)($was_major$was_minor)(delta\s+Perl changes in version )(5\.\d+\.\d+)(.*)} {$1 . $old_major . $old_minor .$3 . "5.$old_major.$old_minor" . $5 . "\n" . "$1$2$3$4$5"}me - or die "Can't find perldelta line in $filename"; + or die "Can't find perldelta line (for perl5$was_major${was_minor}delta) in $filename"; write_or_die($filename, $pod_master); git_add_modified($filename); |