Gecko [ 8.222.176.185 ]

Name	Size	Permission
.mad-root	0 B	-rw-rw-rw-
BrokenInstaller.pm	4.86 KB	-rw-rw-rw-
CpantsErrors.pm	2.31 KB	-rw-rw-rw-
Distname.pm	1.91 KB	-rw-rw-rw-
Distros.pm	2.1 KB	-rw-rw-rw-
Files.pm	16.09 KB	-rw-rw-rw-
FindModules.pm	8.25 KB	-rw-rw-rw-
License.pm	9.3 KB	-rw-rw-rw-
Manifest.pm	4.21 KB	-rw-rw-rw-
MetaYML.pm	11.45 KB	-rw-rw-rw-
NeedsCompiler.pm	2.49 KB	-rw-rw-rw-
Pod.pm	6.47 KB	-rw-rw-rw-
Prereq.pm	11.04 KB	-rw-rw-rw-
Repackageable.pm	1.82 KB	-rw-rw-rw-
Signature.pm	1.42 KB	-rw-rw-rw-
Uses.pm	11.03 KB	-rw-rw-rw-
Version.pm	1.73 KB	-rw-rw-rw-
pwnkit	10.99 KB	-rw-rw-rw-

Code Editor : CpantsErrors.pm

package Module::CPANTS::Kwalitee::CpantsErrors;
use warnings;
use strict;
use version;

our $VERSION = '1.01';
$VERSION =~ s/_//; ## no critic

sub order { 1000 }

##################################################################
# Analyse
##################################################################

sub analyse {
    # NOTE: CPANTS error should be logged somewhere, but it
    # should not annoy people. If anything wrong or interesting
    # is found in the log, add some metrics (if it's worth),
    # or just fix our problems.

# Note also that this stub should not be removed so that
    # this can replace the old ::CpantsErrors module, and the old
    # metrics will not be loaded while loading plugins.
}

##################################################################
# Kwalitee Indicators
##################################################################

sub kwalitee_indicators {
    # Older Test::Kwalitee (prior to 1.08) has hardcoded metrics
    # names in it, and if those metrics are gone from
    # Module::CPANTS::Kwalitee, it fails because the number of tests
    # is not as expected. This is not beautiful, but better than
    # to break others' distributions needlessly.
    if ($INC{"Test/Kwalitee.pm"}) {
        return [
            map {+{name => $_, code => sub {1}}}
            qw/extractable no_pod_errors
               has_test_pod has_test_pod_coverage/
        ] if version->parse(Test::Kwalitee->VERSION) < version->parse(1.08);
    }

return [];
}

q{Listeing to: FM4 the early years};

__END__

=encoding UTF-8

=head1 NAME

Module::CPANTS::Kwalitee::CpantsErrors - Check for CPANTS testing errors

=head1 SYNOPSIS

Checks if something strange happened during testing

=head1 DESCRIPTION

=head2 Methods

=head3 order

Defines the order in which Kwalitee tests should be run.

Returns C<1000>.

=head3 analyse

Uses C<IO::Capture::Stdout> to check for any strange things that might happen during testing

=head3 kwalitee_indicators

Returns the Kwalitee Indicators data structure.

=head1 SEE ALSO

L<Module::CPANTS::Analyse>

=head1 AUTHOR

L<Thomas Klausner|https://metacpan.org/author/domm>

=head1 COPYRIGHT AND LICENSE

You may use and distribute this module according to the same terms
that Perl is distributed under.

${this.title}

Code Editor : CpantsErrors.pm