File Coverage

blib/lib/Catalyst/Helper/View/Download.pm
Criterion Covered Total %
statement 6 9 66.6
branch n/a
condition n/a
subroutine 2 3 66.6
pod 1 1 100.0
total 9 13 69.2


line stmt bran cond sub pod time code
1             package Catalyst::Helper::View::Download;
2              
3 1     1   13969 use strict;
  1         2  
  1         20  
4 1     1   3 use warnings;
  1         1  
  1         53  
5              
6             =head1 NAME
7              
8             Catalyst::Helper::View::Download - Helper for Download Views
9              
10             =head1 SYNOPSIS
11              
12             script/create.pl view Download Download
13              
14             =head1 DESCRIPTION
15              
16             Helper for Download Views.
17              
18             =head1 METHODS
19              
20             =head2 mk_compclass
21              
22             see L<Catalyst::Helper>
23              
24             =cut
25              
26             sub mk_compclass {
27 0     0 1   my ( $self, $helper ) = @_;
28 0           my $file = $helper->{file};
29 0           $helper->render_file( 'compclass', $file );
30             }
31              
32             =head1 SEE ALSO
33              
34             L<Catalyst::Manual>, L<Catalyst::Helper>, L<Catalyst::View::Download>
35              
36             =head1 AUTHOR
37              
38             Travis Chase, C<< <gaudeon at cpan dot org> >>
39              
40             =head1 LICENSE
41              
42             This library is free software. You can redistribute it and/or modify it under the same terms as perl itself.
43              
44             =cut
45              
46             1;
47              
48             __DATA__
49              
50             __compclass__
51             package [% class %];
52             use Moose;
53             use namespace::autoclean;
54              
55             extends 'Catalyst::View::Download';
56              
57             =head1 NAME
58              
59             [% class %] - Download View for [% app %]
60              
61             =head1 DESCRIPTION
62              
63             Download View for [% app %].
64              
65             =head1 SEE ALSO
66              
67             L<[% app %]>
68              
69             =head1 AUTHOR
70              
71             [% author %]
72              
73             =head1 LICENSE
74              
75             This library is free software. You can redistribute it and/or modify it under the same terms as Perl itself.
76              
77             =cut
78              
79             1;