File Coverage

lib/CPAN/Meta/Prereqs/Diff/Addition.pm
Criterion Covered Total %
statement 17 17 100.0
branch n/a
condition n/a
subroutine 9 9 100.0
pod 4 4 100.0
total 30 30 100.0


line stmt bran cond sub pod time code
1 5     5   890 use 5.006; # our
  5         14  
2 5     5   18 use strict;
  5         8  
  5         109  
3 5     5   27 use warnings;
  5         6  
  5         352  
4              
5             package CPAN::Meta::Prereqs::Diff::Addition;
6              
7             our $VERSION = '0.001003';
8              
9             # ABSTRACT: A new dependency
10              
11             our $AUTHORITY = 'cpan:KENTNL'; # AUTHORITY
12              
13 5     5   518 use Moo qw( with has );
  5         10585  
  5         53  
14              
15              
16              
17              
18              
19             has 'requirement' => ( is => ro =>, required => 1 );
20              
21             with 'CPAN::Meta::Prereqs::Diff::Role::Change';
22              
23              
24              
25              
26              
27              
28              
29              
30              
31              
32              
33 1     1 1 514 sub is_addition { return 1 }
34       1 1   sub is_removal { }
35       1 1   sub is_change { }
36              
37              
38              
39              
40              
41              
42              
43              
44              
45             sub describe {
46 16     16 1 176 my ($self) = @_;
47 16         128 return sprintf q[%s.%s: +%s %s], $self->phase, $self->type, $self->module, $self->requirement;
48             }
49              
50 5     5   4279 no Moo;
  5         5  
  5         17  
51              
52             1;
53              
54             __END__
55              
56             =pod
57              
58             =encoding UTF-8
59              
60             =head1 NAME
61              
62             CPAN::Meta::Prereqs::Diff::Addition - A new dependency
63              
64             =head1 VERSION
65              
66             version 0.001003
67              
68             =head1 METHODS
69              
70             =head2 C<is_addition>
71              
72             returns true
73              
74             =head2 C<is_removal>
75              
76             =head2 C<is_change>
77              
78             =head2 C<describe>
79              
80             $object->describe();
81              
82             # runtime.requires: +ExtUtils::MakeMaker 5.0
83              
84             =head1 ATTRIBUTES
85              
86             =head2 C<requirement>
87              
88             =head1 AUTHOR
89              
90             Kent Fredric <kentnl@cpan.org>
91              
92             =head1 COPYRIGHT AND LICENSE
93              
94             This software is copyright (c) 2015 by Kent Fredric <kentfredric@gmail.com>.
95              
96             This is free software; you can redistribute it and/or modify it under
97             the same terms as the Perl 5 programming language system itself.
98              
99             =cut