In perl.git, the branch smoke-me/pod-html has been created
<http://perl5.git.perl.org/perl.git/commitdiff/d1a30ea2dc426e354909eff54f683522681ab603?hp=0000000000000000000000000000000000000000>
at d1a30ea2dc426e354909eff54f683522681ab603 (commit)
- Log -----------------------------------------------------------------
commit d1a30ea2dc426e354909eff54f683522681ab603
Author: Ricardo Signes <[email protected]>
Date: Mon Mar 12 13:19:23 2012 -0400
make the pod2html tests work with fs with vols
my $cwd = Cwd::cwd();
my $new_dir = catdir $cwd, "t";
my $infile = catfile $new_dir, "$podfile.pod";
Prior to these changes, we were getting the volume from $cwd, above, and
then basically ignoring it. When the cwd was c:\foo, ignoring the
volume in the catdir/catfile operations would munge things to C:\foo,
which meant that later a native check of path prefix would fail:
C:\foo is not a prefix of c:\foo\bar because of the case difference in
the volume name.
The is a legitimate fix, but the code is still problematic in other
places because (a) it tends to do path operations with no consideration
for volumes and (b) it has at least one place where it decides whether
path X is below path Y by using substr/index instead of path checking
routines.
M ext/Pod-Html/t/pod2html-lib.pl
commit 495a00a19fe0c6e9948090f8539f58599860bd4d
Author: Ricardo Signes <[email protected]>
Date: Mon Mar 5 22:31:52 2012 -0500
Sisyphus's fix for pod2html
M ext/Pod-Html/lib/Pod/Html.pm
-----------------------------------------------------------------------
--
Perl5 Master Repository
