p4raw-id: //depot/perl@6978
=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.
));
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);