File Coverage

lib/Dist/Zilla/Plugin/CSJEWELL/VersionGetter.pm
Criterion Covered Total %
statement 11 16 68.7
branch n/a
condition n/a
subroutine 4 5 80.0
pod 0 1 0.0
total 15 22 68.1


line stmt bran cond sub pod time code
1             package Dist::Zilla::Plugin::CSJEWELL::VersionGetter;
2              
3 1     1   1946 use 5.008003;
  1         6  
4 1     1   7 use Moose;
  1         2  
  1         12  
5 1     1   9049 use ExtUtils::MakeMaker;
  1         110238  
  1         289  
6             with 'Dist::Zilla::Role::VersionProvider';
7              
8             our $VERSION = '0.990';
9              
10             sub provide_version {
11 0     0 0   my ($self) = @_;
12 0           my $name = $self->zilla->main_module->name;
13 0           my $version = MM->parse_version($name);
14              
15 0           $self->log_debug([ 'providing version %s', $version ]);
16              
17 0           return $version;
18             }
19              
20             __PACKAGE__->meta->make_immutable;
21 1     1   12 no Moose;
  1         3  
  1         15  
22             1;
23              
24             __END__
25              
26             =pod
27              
28             =head1 NAME
29              
30             Dist::Zilla::Plugin::CSJEWELL::VersionGetter - Grab the version from the main file
31              
32             =head1 VERSION
33              
34             This document describes Dist::Zilla::Plugin::CSJEWELL::VersionGetter version 0.993.
35              
36             =head1 DESCRIPTION
37              
38             This plugin gets the distribution version from the main distribution module,
39             by calling ExtUtils::MakeMaker->parse_version().
40              
41             =for Pod::Coverage provide_version
42              
43             =head1 AUTHOR
44              
45             Curtis Jewell <CSJewell@cpan.org>
46              
47             =head1 SEE ALSO
48              
49             L<Dist::Zilla::BeLike::CSJEWELL|Dist::Zilla::BeLike::CSJEWELL>
50              
51             =head1 LICENSE AND COPYRIGHT
52              
53             Copyright (c) 2010, 2021 Curtis Jewell C<< CSJewell@cpan.org >>.
54              
55             This module is free software; you can redistribute it and/or
56             modify it under the same terms as Perl itself, either version
57             5.8.1 or any later version. See L<perlartistic|perlartistic>
58             and L<perlgpl|perlgpl>.
59              
60             The full text of the license can be found in the
61             LICENSE file included with this module.
62              
63             =head1 DISCLAIMER OF WARRANTY
64              
65             BECAUSE THIS SOFTWARE IS LICENSED FREE OF CHARGE, THERE IS NO WARRANTY
66             FOR THE SOFTWARE, TO THE EXTENT PERMITTED BY APPLICABLE LAW. EXCEPT WHEN
67             OTHERWISE STATED IN WRITING THE COPYRIGHT HOLDERS AND/OR OTHER PARTIES
68             PROVIDE THE SOFTWARE "AS IS" WITHOUT WARRANTY OF ANY KIND, EITHER
69             EXPRESSED OR IMPLIED, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
70             WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE. THE
71             ENTIRE RISK AS TO THE QUALITY AND PERFORMANCE OF THE SOFTWARE IS WITH
72             YOU. SHOULD THE SOFTWARE PROVE DEFECTIVE, YOU ASSUME THE COST OF ALL
73             NECESSARY SERVICING, REPAIR, OR CORRECTION.
74              
75             IN NO EVENT UNLESS REQUIRED BY APPLICABLE LAW OR AGREED TO IN WRITING
76             WILL ANY COPYRIGHT HOLDER, OR ANY OTHER PARTY WHO MAY MODIFY AND/OR
77             REDISTRIBUTE THE SOFTWARE AS PERMITTED BY THE ABOVE LICENCE, BE
78             LIABLE TO YOU FOR DAMAGES, INCLUDING ANY GENERAL, SPECIAL, INCIDENTAL,
79             OR CONSEQUENTIAL DAMAGES ARISING OUT OF THE USE OR INABILITY TO USE
80             THE SOFTWARE (INCLUDING BUT NOT LIMITED TO LOSS OF DATA OR DATA BEING
81             RENDERED INACCURATE OR LOSSES SUSTAINED BY YOU OR THIRD PARTIES OR A
82             FAILURE OF THE SOFTWARE TO OPERATE WITH ANY OTHER SOFTWARE), EVEN IF
83             SUCH HOLDER OR OTHER PARTY HAS BEEN ADVISED OF THE POSSIBILITY OF
84             SUCH DAMAGES.
85              
86             =cut
87