view release on metacpan or  search on metacpan

ChangeLog  view on Meta::CPAN

0.9916      Sun Feb 16 22:47:46 GMT 2025

* RT#158146 Don't warn about $APPDATA being set on Cygwin as well

0.9914      Sun Nov 21 18:34:50 GMT 2021

* Support 'cpan_path' in CHECKSUMS files

0.9912      Sat Aug 21 12:22:49 BST 2021

* Removed circular dependency in CPANPLUS::Internals::*

0.9910      Sat Dec 19 10:41:41 GMT 2020

* Change default mirror to www.cpan.org
* Bugtracker is now github

lib/CPANPLUS/Module/Checksums.pm  view on Meta::CPAN

    my $file = $self->_get_checksums_file( verbose => $verbose ) or (
        error(loc(q[Could not fetch '%1' file], CHECKSUMS)), return );

    $self->_check_signature_for_checksum_file( file => $file ) or (
        error(loc(q[Could not verify '%1' file], CHECKSUMS)), return );
    #for whole CHECKSUMS file

    my $href = $self->_parse_checksums_file( file => $file ) or (
        error(loc(q[Could not parse '%1' file], CHECKSUMS)), return );

    my $cpan_path = $href->{ $self->package }->{'cpan_path'};

    if ( defined $cpan_path ) {
        my $chk_pth = join '/', 'authors/id', $cpan_path;
        if ( $chk_pth ne $self->path ) {
            error(loc(  "Archive checksum path for '%1': " .
                        "should be '%2', but it says it is '%3'. Abandoning.",
                        $self->package, $self->path, $chk_pth));
            return $self->status->checksum_ok(0);
        }
    }

    my $size = $href->{ $self->package }->{'size'};