diff options
| author | Rafael Garcia-Suarez <rgs@consttype.org> | 2012-03-31 16:16:09 +0200 |
|---|---|---|
| committer | Rafael Garcia-Suarez <rgs@consttype.org> | 2012-03-31 16:16:09 +0200 |
| commit | 258f564231885d20cd3b29a014dda4c79b44b1b0 (patch) | |
| tree | 3dc347dc82e2fe7bd167a2e484a259cbf0bbd305 | |
| parent | e5b1b4c7972a112957188e0797f82e5d54943bcb (diff) | |
| download | perl-258f564231885d20cd3b29a014dda4c79b44b1b0.tar.gz | |
Add perltodo in the list of ignored pods
(like the other obsolete manpage placeholders)
| -rw-r--r-- | Porting/pod_lib.pl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Porting/pod_lib.pl b/Porting/pod_lib.pl index 98c32f4565..945e61c697 100644 --- a/Porting/pod_lib.pl +++ b/Porting/pod_lib.pl @@ -252,7 +252,7 @@ sub get_pod_metadata { # in perl.pod, they just exist so that if someone types "perldoc perltoot" # they get some sort of pointer to the new docs. my %ignoredpods - = map { ( "$_.pod" => 1 ) } qw( perlboot perlbot perltooc perltoot ); + = map { ( "$_.pod" => 1 ) } qw( perlboot perlbot perltodo perltooc perltoot ); # Convert these to a list of filenames. ++$our_pods{"$_.pod"} foreach keys %{$state{pods}}; |