On Mon, 10 Apr 2006, Michael Tempest wrote:
Hi Michael,
> A few weeks ago I took the bold step of upgrading from Perl 5.6.1 to
> Perl 5.8.8 (Build 816). All in all, it went better than I expected.
Build 816 has some significant problems, especially on Windows, so
I want to encourage you to upgrade to 817 instead.
> However, the generated HTML help has many broken or missing links.
[...]
> Does anybody know what is wrong here? And when it will be fixed?
The Pod::Html doesn't correctly depodify multi-line strings, so some
mutilated version of the markup ends up in the anchor names. I've
just sent a patch for this to Perl5 Porters. If you really want
to fix things right away, then you can install the patch manually,
delete the Perl\html\lib\Pod/perlfunc.html file and run
perl -MActivePerl::DocTools -eUpdateHTML
from the commandline to regenerate the missing HTML files. Note that
some HTML files are not generated from POD, so don't go an remove the
whole Perl/html directory, or you will end up missing some of the docs.
Cheers,
-Jan
--- lib/Pod/Html.pm.orig Wed Apr 05 04:50:38 2006
+++ lib/Pod/Html.pm Mon Apr 10 15:21:00 2006
@@ -2040,7 +2040,7 @@
return $res unless defined $$rstr;
if( ! defined( $func ) ){
# skip to next begin of an interior sequence
- while( $$rstr =~ s/\A(.*?)([BCEFILSXZ])<(<+[^\S\n]+)?// ){
+ while( $$rstr =~ s/\A(.*?)([BCEFILSXZ])<(<+[^\S\n]+)?//s ){
# recurse into its text
$res .= $1 . depod1( $rstr, $2, closing $3);
}
@@ -2059,7 +2059,7 @@
# all others: either recurse into new function or
# terminate at closing angle bracket
my $term = pattern $closing;
- while( $$rstr =~ s/\A(.*?)(([BCEFILSXZ])<(<+[^\S\n]+)?|$term)// ){
+ while( $$rstr =~ s/\A(.*?)(([BCEFILSXZ])<(<+[^\S\n]+)?|$term)//s ){
$res .= $1;
last unless $3;
$res .= depod1( $rstr, $3, closing $4 );
End of Patch.
_______________________________________________
ActivePerl mailing list
ActivePerl@listserv.ActiveState.com
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
