16 lines
645 B
Diff
16 lines
645 B
Diff
diff --git a/cpan/CPAN/lib/CPAN/HandleConfig.pm b/cpan/CPAN/lib/CPAN/HandleConfig.pm
|
|
index e24a969..d8951cb 100644
|
|
--- a/cpan/CPAN/lib/CPAN/HandleConfig.pm
|
|
+++ b/cpan/CPAN/lib/CPAN/HandleConfig.pm
|
|
@@ -544,6 +544,7 @@ sub cpan_home_dir_candidates {
|
|
push @dirs, $ENV{USERPROFILE} if $ENV{USERPROFILE};
|
|
|
|
$CPAN::Config->{load_module_verbosity} = $old_v;
|
|
+ # @@CPAN_HOME@@ This is a placeholder so we can reliably search and update $dotcpan
|
|
my $dotcpan = $^O eq 'VMS' ? '_cpan' : '.cpan';
|
|
@dirs = map { File::Spec->catdir($_, $dotcpan) } grep { defined } @dirs;
|
|
return wantarray ? @dirs : $dirs[0];
|
|
--
|
|
2.31.1.windows.1
|
|
|