| CC: | jkeenan [...] cpan.org, shlomif [...] cpan.org, tony [...] develop-help.com |
| Subject: | [RT #118615] POD errors in 'perldoc -f lc' |
This bug was originally reported in the Perl 5 bug queue at https://rt.perl.org/rt3/Ticket/Display.html?id=118615. Because Pod-Perldoc is listed in Porting/Maintainers.pl as being primarily maintained on CPAN, I am moving the report into this queue. --jkeenan
##########
'perldoc -f lc' complains about POD errors. Unfortunately it also chops off
the list explaining what exactly gets returned.
% perldoc -f lc
lc EXPR
lc Returns a lowercased version of EXPR. This is the internal function implementing the "\L" escape in double-quoted strings.
If EXPR is omitted, uses $_.
What gets returned depends on several factors:
POD ERRORS
Hey! The above document had some coding errors, which are explained below:
Around line 1:
=over without closing =back
%
##########
A patch was supplied by Shlomi Fish and is attached. I have informally tested it and it appears to do the trick. -- jkeenan
| Subject: | 118615-Pod-Perldoc.patch |
diff --git a/cpan/Pod-Perldoc/lib/Pod/Perldoc.pm b/cpan/Pod-Perldoc/lib/Pod/Perldoc.pm
index 9cdee80..0d0b76c 100644
--- a/cpan/Pod-Perldoc/lib/Pod/Perldoc.pm
+++ b/cpan/Pod-Perldoc/lib/Pod/Perldoc.pm
@@ -1199,7 +1199,7 @@ sub search_perlfunc {
$found = 1;
}
else {
- last;
+ last if $found > 1 and not $inlist;
}
}
elsif (/^=item/) {