File Coverage

blib/lib/Email/MIME/Kit/Bulk/Kit.pm
Criterion Covered Total %
statement 16 16 100.0
branch n/a
condition n/a
subroutine 6 6 100.0
pod n/a
total 22 22 100.0


line stmt bran cond sub pod time code
1             package Email::MIME::Kit::Bulk::Kit;
2             BEGIN {
3 10     10   256 $Email::MIME::Kit::Bulk::Kit::AUTHORITY = 'cpan:YANICK';
4             }
5             # ABSTRACT: Email::MIME kit customized for Email::MIME::Kit::Bulk
6             $Email::MIME::Kit::Bulk::Kit::VERSION = '0.0.1';
7              
8 10     10   40 use strict;
  10         19  
  10         228  
9 10     10   30 use warnings;
  10         11  
  10         229  
10              
11 10     10   3169 use Email::MIME::Kit::Bulk::ManifestReader::JSON;
  10         30  
  10         308  
12              
13 10     10   68 use Moose;
  10         10  
  10         59  
14              
15             extends 'Email::MIME::Kit';
16              
17             has '+manifest_reader' => (
18             default => '=Email::MIME::Kit::Bulk::ManifestReader::JSON',
19             );
20              
21             has language => (
22             is => 'ro',
23             isa => 'Str',
24             predicate => 'has_language',
25             );
26              
27             __PACKAGE__->meta->make_immutable;
28 10     10   42008 no Moose;
  10         20  
  10         49  
29              
30             1;
31              
32             __END__
33              
34             =pod
35              
36             =encoding UTF-8
37              
38             =head1 NAME
39              
40             Email::MIME::Kit::Bulk::Kit - Email::MIME kit customized for Email::MIME::Kit::Bulk
41              
42             =head1 VERSION
43              
44             version 0.0.1
45              
46             =head1 DESCRIPTION
47              
48             I<Email::MIME::Kit::Bulk::Kit> extends L<Email::MIME::Kit>. It defaults the C<manifest_reader>
49             attribute to L<Email::MIME::Kit::Bulk::ManifestReader::JSON>, and add a new
50             C<language> attribute.
51              
52             =head1 AUTHORS
53              
54             =over 4
55              
56             =item *
57              
58             Jesse Luehrs <doy@cpan.org>
59              
60             =item *
61              
62             Yanick Champoux <yanick.champoux@iinteractive.com>
63              
64             =back
65              
66             =head1 COPYRIGHT AND LICENSE
67              
68             This software is copyright (c) 2015 by Infinity Interactive <contact@iinteractive.com>.
69              
70             This is free software; you can redistribute it and/or modify it under
71             the same terms as the Perl 5 programming language system itself.
72              
73             =cut