diff options
author | Jarkko Hietaniemi <jhi@iki.fi> | 2000-09-01 16:00:42 +0000 |
---|---|---|
committer | Jarkko Hietaniemi <jhi@iki.fi> | 2000-09-01 16:00:42 +0000 |
commit | 051b35bf0b07820076d573321931d9a4f436c8e3 (patch) | |
tree | 2e7e440f74042ac098b1742bf372ac7d7cea7e5b | |
parent | 422af00a325a1ad9ccc3d4fb7a0c04b9ab88ade6 (diff) | |
download | perl-051b35bf0b07820076d573321931d9a4f436c8e3.tar.gz |
Update to PodParser 1.18, from Brad Appleton.
p4raw-id: //depot/perl@6978
-rw-r--r-- | lib/Pod/Checker.pm | 2 | ||||
-rw-r--r-- | t/pod/find.t | 2 |
2 files changed, 2 insertions, 2 deletions
diff --git a/lib/Pod/Checker.pm b/lib/Pod/Checker.pm index 01ac486e69..37ed68f873 100644 --- a/lib/Pod/Checker.pm +++ b/lib/Pod/Checker.pm @@ -202,7 +202,7 @@ These may not necessarily cause trouble, but indicate mediocre style. =over 4 -=item * multiple occurrence of link target I<name> +=item * multiple occurence of link target I<name> The POD file has some C<=item> and/or C<=head> commands that have the same text. Potential hyperlinks to such a text cannot be unique then. diff --git a/t/pod/find.t b/t/pod/find.t index c40c8b437b..e0ab63ef68 100644 --- a/t/pod/find.t +++ b/t/pod/find.t @@ -38,7 +38,7 @@ my $compare = join(',', qw( )); if ($^O eq 'VMS') { $compare = lc($compare); - $result = join(',', sort grep {pod::} values %pods); + $result = join(',', sort grep(/pod::/, values %pods)); $result =~ s/$Qlib_dir/pod::/g; my $count = 0; my @result = split(/,/,$result); |