File Coverage

blib/lib/Elastic/Model/Trait/Exclude.pm
Criterion Covered Total %
statement 12 12 100.0
branch n/a
condition n/a
subroutine 4 4 100.0
pod n/a
total 16 16 100.0


line stmt bran cond sub pod time code
1             package Elastic::Model::Trait::Exclude;
2             $Elastic::Model::Trait::Exclude::VERSION = '0.51';
3 23     23   138 use Moose::Role;
  23         41  
  23         165  
4 23     23   109356 use Moose::Exporter;
  23         110  
  23         135  
5 23     23   1388 use MooseX::Types::Moose qw(Bool);
  23         140  
  23         287  
6 23     23   105331 use namespace::autoclean;
  23         51  
  23         293  
7              
8             Moose::Exporter->setup_import_methods(
9                 role_metaroles =>
10                     { applied_attribute => ['Elastic::Model::Trait::Exclude'], },
11                 class_metaroles => { attribute => ['Elastic::Model::Trait::Exclude'] },
12             );
13              
14             has 'exclude' => ( isa => Bool, is => 'ro', default => 1 );
15              
16             1;
17              
18             =pod
19            
20             =encoding UTF-8
21            
22             =head1 NAME
23            
24             Elastic::Model::Trait::Exclude - An internal use trait
25            
26             =head1 VERSION
27            
28             version 0.51
29            
30             =head1 DESCRIPTION
31            
32             This trait is used by Elastic::Model doc attributes which shouldn't be
33             stored in Elasticsearch. It implements just the
34             L<Elastic::Model::Trait::Field/"exclude"> keyword.
35            
36             =head1 AUTHOR
37            
38             Clinton Gormley <drtech@cpan.org>
39            
40             =head1 COPYRIGHT AND LICENSE
41            
42             This software is copyright (c) 2015 by Clinton Gormley.
43            
44             This is free software; you can redistribute it and/or modify it under
45             the same terms as the Perl 5 programming language system itself.
46            
47             =cut
48              
49             __END__
50            
51             # ABSTRACT: An internal use trait
52            
53