CPAN.pm (CPAN-2.35) | : | CPAN.pm (CPAN-2.36) | ||
---|---|---|---|---|
# -*- Mode: cperl; coding: utf-8; cperl-indent-level: 4 -*- | # -*- Mode: cperl; coding: utf-8; cperl-indent-level: 4 -*- | |||
# vim: ts=4 sts=4 sw=4: | # vim: ts=4 sts=4 sw=4: | |||
use strict; | use strict; | |||
package CPAN; | package CPAN; | |||
$CPAN::VERSION = '2.35'; | $CPAN::VERSION = '2.36'; | |||
$CPAN::VERSION =~ s/_//; | $CPAN::VERSION =~ s/_//; | |||
# we need to run chdir all over and we would get at wrong libraries | # we need to run chdir all over and we would get at wrong libraries | |||
# there | # there | |||
use File::Spec (); | use File::Spec (); | |||
BEGIN { | BEGIN { | |||
if (File::Spec->can("rel2abs")) { | if (File::Spec->can("rel2abs")) { | |||
for my $inc (@INC) { | for my $inc (@INC) { | |||
$inc = File::Spec->rel2abs($inc) unless ref $inc; | $inc = File::Spec->rel2abs($inc) unless ref $inc; | |||
} | } | |||
End of changes. 1 change blocks. | ||||
1 lines changed or deleted | 1 lines changed or added |