File Coverage

blib/lib/Renard/Incunabula/Document/Null.pm
Criterion Covered Total %
statement 13 13 100.0
branch n/a
condition n/a
subroutine 4 4 100.0
pod n/a
total 17 17 100.0


line stmt bran cond sub pod time code
1 1     1   7 use Renard::Incunabula::Common::Setup;
  1         2  
  1         9  
2             package Renard::Incunabula::Document::Null;
3             # ABSTRACT: A null document
4             $Renard::Incunabula::Document::Null::VERSION = '0.005';
5 1     1   6643 use Moo;
  1         3  
  1         6  
6 1     1   797 use Renard::Incunabula::Common::Types qw(ArrayRef InstanceOf);
  1         147235  
  1         10  
7              
8             has pages => (
9             is => 'ro',
10             isa => ArrayRef[InstanceOf['Renard::Incunabula::Page::Null']],
11             required => 1,
12             );
13              
14 1     1   76 method _build_last_page_number() {
  1         2  
15 1         3 0 + @{ $self->pages };
  1         16  
16             }
17              
18             extends qw(Renard::Incunabula::Document);
19              
20             with qw(Renard::Incunabula::Document::Role::Pageable);
21              
22             1;
23              
24             __END__
25              
26             =pod
27              
28             =encoding UTF-8
29              
30             =head1 NAME
31              
32             Renard::Incunabula::Document::Null - A null document
33              
34             =head1 VERSION
35              
36             version 0.005
37              
38             =head1 EXTENDS
39              
40             =over 4
41              
42             =item * L<Renard::Incunabula::Document>
43              
44             =back
45              
46             =head1 CONSUMES
47              
48             =over 4
49              
50             =item * L<Renard::Incunabula::Document::Role::Pageable>
51              
52             =back
53              
54             =head1 ATTRIBUTES
55              
56             =head2 pages
57              
58             An C<ArrayRef[InstanceOf['Renard::Incunabula::Page::Null']]> of pages.
59              
60             This attribute is required.
61              
62             =head1 AUTHOR
63              
64             Project Renard
65              
66             =head1 COPYRIGHT AND LICENSE
67              
68             This software is copyright (c) 2017 by Project Renard.
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