summaryrefslogtreecommitdiff
path: root/lib/CPAN.pm
diff options
context:
space:
mode:
Diffstat (limited to 'lib/CPAN.pm')
-rw-r--r--lib/CPAN.pm3
1 files changed, 3 insertions, 0 deletions
diff --git a/lib/CPAN.pm b/lib/CPAN.pm
index 1ec27336f0..12256d6883 100644
--- a/lib/CPAN.pm
+++ b/lib/CPAN.pm
@@ -2270,6 +2270,9 @@ sub localize {
# where we did get a file from
my(@reordered,$last);
$CPAN::Config->{urllist} ||= [];
+ unless (ref $CPAN::Config->{urllist} eq 'ARRAY') {
+ warn "Malformed urllist; ignoring. Configuration file corrupt?\n";
+ }
$last = $#{$CPAN::Config->{urllist}};
if ($force & 2) { # local cpans probably out of date, don't reorder
@reordered = (0..$last);