Re: pod-error in perldocs (fix)

[ikegami]

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;
        }
        .
        .
        .
}

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;
        }
        .
        .
        .
}

Want the honours of reporting it?

[LanX]

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?

[ikegami]

It's a core module, so you can use perlbug

[LanX]

Done!

I added special thanx to you both and the wish to share all possible honours! ;-)