diff options
| author | Gurusamy Sarathy <gsar@cpan.org> | 1999-10-10 06:33:15 +0000 |
|---|---|---|
| committer | Gurusamy Sarathy <gsar@cpan.org> | 1999-10-10 06:33:15 +0000 |
| commit | 7ec2cea42ff48a380e66445f3c1f56b9ff25c203 (patch) | |
| tree | da563fbefd0f838f68842f74f7b450d9d1c7fa41 /lib/diagnostics.pm | |
| parent | 90564d9841a592d4954f5fb3ef7a8ffd42cd7c65 (diff) | |
| download | perl-7ec2cea42ff48a380e66445f3c1f56b9ff25c203.tar.gz | |
install pods to 'pods' rather than 'pod' on cygwin (modified
a patch suggested by cwilson@cc865179-c.chmbl1.ga.home.com)
p4raw-id: //depot/perl@4333
Diffstat (limited to 'lib/diagnostics.pm')
| -rwxr-xr-x | lib/diagnostics.pm | 9 |
1 files changed, 7 insertions, 2 deletions
diff --git a/lib/diagnostics.pm b/lib/diagnostics.pm index f174ee5feb..05af6211fc 100755 --- a/lib/diagnostics.pm +++ b/lib/diagnostics.pm @@ -177,9 +177,14 @@ if ($^O eq 'VMS') { $privlib = VMS::Filespec::unixify($privlib); $archlib = VMS::Filespec::unixify($archlib); } -@trypod = ("$archlib/pod/perldiag.pod", +@trypod = ( + "$archlib/pod/perldiag.pod", "$privlib/pod/perldiag-$].pod", - "$privlib/pod/perldiag.pod"); + "$privlib/pod/perldiag.pod" + "$archlib/pods/perldiag.pod", + "$privlib/pods/perldiag-$].pod", + "$privlib/pods/perldiag.pod" + ); # handy for development testing of new warnings etc unshift @trypod, "./pod/perldiag.pod" if -e "pod/perldiag.pod"; ($PODFILE) = ((grep { -e } @trypod), $trypod[$#trypod])[0]; |