view release on metacpan or  search on metacpan

lib/CPAN/Mini.pm  view on Meta::CPAN

154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
#pod
#pod * C<no_conn_cache>
#pod
#pod If true, no connection cache will be established.  This is mostly useful as a
#pod workaround for connection cache failures.
#pod
#pod =end :list
#pod
#pod =cut
 
sub update_mirror {
  my $self = shift;
  $self = $self->new(@_) unless ref $self;
 
  unless ($self->{offline}) {
    my $local = $self->{local};
 
    $self->log("Updating $local");
    $self->log("Mirroring from $self->{remote}");
    $self->log("=" x 63);