File Coverage

blib/lib/MoopsX/TraitFor/Parser/UsingMoose.pm
Criterion Covered Total %
statement 11 11 100.0
branch n/a
condition n/a
subroutine 4 4 100.0
pod n/a
total 15 15 100.0


line stmt bran cond sub pod time code
1 1     1   69906 use 5.14.0;
  1         3  
2 1     1   4 use strict;
  1         3  
  1         21  
3 1     1   4 use warnings;
  1         2  
  1         70  
4              
5             package MoopsX::TraitFor::Parser::UsingMoose;
6              
7             # ABSTRACT: A Moops::Parser traits that sets 'using Moose'
8             our $AUTHORITY = 'cpan:CSSON'; # AUTHORITY
9             our $VERSION = '0.0103';
10              
11 1     1   6 use Moo::Role;
  1         2  
  1         5  
12              
13             after parse => sub {
14             shift->relations->{'using'} = ['Moose'];
15             };
16              
17             1;
18              
19             __END__
20              
21             =pod
22              
23             =encoding UTF-8
24              
25             =head1 NAME
26              
27             MoopsX::TraitFor::Parser::UsingMoose - A Moops::Parser traits that sets 'using Moose'
28              
29             =head1 VERSION
30              
31             Version 0.0103, released 2020-07-29.
32              
33             =head1 SYNOPSIS
34              
35             use Moops traits => ['MoopsX::TraitFor::Parser::UsingMoose'];
36              
37             class My::Class {
38              
39             # This is a Moose class
40              
41             }
42              
43             =head1 DESCRIPTION
44              
45             This class is a trait for L<Moops::Parser> that automatically sets 'using Moose' on C<role> and C<class> statements.
46              
47             But use L<MoopX::UsingMoose> instead.
48              
49             =head1 SOURCE
50              
51             L<https://github.com/Csson/p5-MoopsX-UsingMoose>
52              
53             =head1 HOMEPAGE
54              
55             L<https://metacpan.org/release/MoopsX-UsingMoose>
56              
57             =head1 AUTHOR
58              
59             Erik Carlsson <info@code301.com>
60              
61             =head1 COPYRIGHT AND LICENSE
62              
63             This software is copyright (c) 2016 by Erik Carlsson.
64              
65             This is free software; you can redistribute it and/or modify it under
66             the same terms as the Perl 5 programming language system itself.
67              
68             =cut