view release on metacpan or  search on metacpan

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

155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
    return;
} # end of subroutine add
 
 
=head2 update
 
Updates the cpan mirror
 
=cut
 
sub update :Runmode {
    my $self = shift;
 
    my $mcpi = $self->_mcpi();
 
    $mcpi->update_mirror();
    $mcpi->inject();
 
    $self->header_add(-status => '202 Mirror updated');
    return;
} # end of subroutine update