| 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 |
| |