File Coverage

blib/lib/WWW/Google/Contacts/Type/Category.pm
Criterion Covered Total %
statement 15 15 100.0
branch n/a
condition n/a
subroutine 5 5 100.0
pod n/a
total 20 20 100.0


line stmt bran cond sub pod time code
1             package WWW::Google::Contacts::Type::Category;
2             {
3             $WWW::Google::Contacts::Type::Category::VERSION = '0.39';
4             }
5              
6 19     19   119 use Moose;
  19         44  
  19         201  
7 19     19   130217 use MooseX::Types::Moose qw( Str );
  19         48  
  19         224  
8 19     19   111676 use WWW::Google::Contacts::InternalTypes qw( Rel );
  19         46910  
  19         127  
9 19     19   65010 use WWW::Google::Contacts::Meta::Attribute::Trait::XmlField;
  19         56  
  19         1884  
10              
11             extends 'WWW::Google::Contacts::Type::Base';
12              
13             has type => (
14             isa => Rel,
15             is => 'rw',
16             traits => ['XmlField'],
17             xml_key => 'scheme',
18             predicate => 'has_type',
19             coerce => 1,
20             required => 1,
21             );
22              
23             has term => (
24             isa => Rel,
25             is => 'rw',
26             traits => ['XmlField'],
27             xml_key => 'term',
28             predicate => 'has_term',
29             coerce => 1,
30             required => 1,
31             );
32              
33 19     19   125 no Moose;
  19         43  
  19         192  
34             __PACKAGE__->meta->make_immutable;
35             1;
36             __END__