Re: pod-error in perldocs (fix)

For the same reason, perldoc -v %SIG also produces bad POD.

The bugs are still present in blead.

Untested fix for Pod/Perldoc.pm:

sub search_perlvar {
        .
        .
        .
        elsif (/^=back/) {
            --$inlist;
        }
        .
        .
        .
}

#.....................................................................
+.....

sub search_perlfunc {
        .
        .
        .
        elsif (/^=back/) {
            --$inlist;
        }
        .
        .
        .
}
[download]

should be

sub search_perlvar {
        .
        .
        .
        elsif (/^=back/) {
            last if $found && !$inheader && !$inlist;
            --$inlist;
        }
        .
        .
        .
}

#.....................................................................
+.....

sub search_perlfunc {
        .
        .
        .
        elsif (/^=back/) {
            last if $found > 1 and not $inlist;
            --$inlist;
        }
        .
        .
        .
}
[download]

Want the honours of reporting it?

Comment on Re: pod-error in perldocs (fix) Select or Download Code

Replies are listed 'Best First'.
Re^2: pod-error in perldocs by LanX (Saint) on Sep 23, 2009 at 16:17 UTC
Want the honours of reporting it? Do we get a cake or a beer for free :-) seriously, let's share the honours (however they are realized) me for reporting, and you two for fixing. Is there a bugtracker (especially for perldoc) errors? Cheers Rolf	[reply]
Re^3: pod-error in perldocs by ikegami (Patriarch) on Sep 23, 2009 at 16:22 UTC
It's a core module, so you can use `perlbug`	[reply] [d/l]
Re^4: pod-error in perldocs by LanX (Saint) on Sep 23, 2009 at 16:40 UTC
Done! I added special thanx to you both and the wish to share all possible honours! ;-) Cheers Rolf	[reply]
Re^5: pod-error in perldocs (ticket) by ikegami (Patriarch) on Sep 23, 2009 at 21:25 UTC