diff options
| author | Nicholas Clark <nick@ccl4.org> | 2011-12-19 14:45:17 +0100 |
|---|---|---|
| committer | Nicholas Clark <nick@ccl4.org> | 2011-12-21 09:07:27 +0100 |
| commit | 0aef0fe5d2d4655704f4ccaaacd38582e3744d71 (patch) | |
| tree | 071ec044828abeda9314ff522e6624e83162c946 /Porting/new-perldelta.pl | |
| parent | 7ef9d42cef95562593dd30e0fab41e7e09fd0e0e (diff) | |
| download | perl-0aef0fe5d2d4655704f4ccaaacd38582e3744d71.tar.gz | |
Eliminate pod.lst. pod/perl.pod is now the master file for Pod metadata.
perl.pod already contained virtually all the information in pod.lst. Add
the remainder as =begin and =for Pod blocks.
As perl.pod no longer needs to be regenerated, remove the redundant code from
Porting/pod_rules.pl. Update (nearly) all references to pod.lst.
Diffstat (limited to 'Porting/new-perldelta.pl')
| -rw-r--r-- | Porting/new-perldelta.pl | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/Porting/new-perldelta.pl b/Porting/new-perldelta.pl index 4fa7fd13f2..d4fb5936ee 100644 --- a/Porting/new-perldelta.pl +++ b/Porting/new-perldelta.pl @@ -82,11 +82,11 @@ foreach([rXXX => $was_major], write_or_die('pod/perldelta.pod', $newdelta); git_add_modified('pod/perldelta.pod'); -$filename = 'pod.lst'; +$filename = 'pod/perl.pod'; my $pod_master = slurp_or_die($filename); -$pod_master =~ s{^(\s*perl5)($old_major$old_minor)(delta\s+Perl changes in version )(5\.\d+\.\d+)(.*)} - {$1 . $new_major . $new_minor .$3 . "5.$new_major.$new_minor" . $5 . "\n" . +$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"; |