File Coverage

blib/lib/Catalyst/Helper/Model/SMS.pm
Criterion Covered Total %
statement 6 10 60.0
branch n/a
condition n/a
subroutine 2 3 66.6
pod 1 1 100.0
total 9 14 64.2


line stmt bran cond sub pod time code
1             package Catalyst::Helper::Model::SMS;
2              
3 1     1   4744 use strict;
  1         2  
  1         38  
4 1     1   6 use warnings;
  1         3  
  1         120  
5              
6             our $VERSION = '0.4';
7              
8             # ABSTRACT: Catalyst Helper for SMS::Send Models
9              
10              
11             sub mk_compclass {
12 0     0 1   my ( $self, $helper ) = @_;
13 0           my $file = $helper->{file};
14 0           $helper->render_file( 'compclass', $file );
15 0           return 1;
16             }
17              
18              
19             1;
20              
21             =pod
22              
23             =head1 NAME
24              
25             Catalyst::Helper::Model::SMS - Catalyst Helper for SMS::Send Models
26              
27             =head1 VERSION
28              
29             version 0.4
30              
31             =head1 SYNOPSIS
32              
33             script/create.pl model SMS SMS
34              
35             =head1 DESCRIPTION
36              
37             Helper for SMS::Send Model.
38              
39             =head2 METHODS
40              
41             =over 4
42              
43             =item mk_compclass
44              
45             Makes a main model class
46              
47             =back
48              
49             =head1 NAME
50              
51             Catalyst::Helper::Model::SMS - Helper for SMS::Send based Models
52              
53             =head1 SEE ALSO
54              
55             L<Catalyst::Manual>, L<Catalyst::Test>, L<Catalyst::Request>,
56             L<Catalyst::Response>, L<Catalyst::Helper>
57              
58             =head1 AUTHOR
59              
60             Martin Atukunda, C<matlads@cpan.org>
61              
62             =head1 LICENSE
63              
64             This library is free software . You can redistribute it and/or modify
65             it under the same terms as perl itself.
66              
67             =head1 AUTHOR
68              
69             Martin Atukunda <matlads@cpan.org>
70              
71             =head1 COPYRIGHT AND LICENSE
72              
73             This software is copyright (c) 2013 by Martin Atukunda.
74              
75             This is free software; you can redistribute it and/or modify it under
76             the same terms as the Perl 5 programming language system itself.
77              
78             =cut
79              
80             __DATA__
81              
82             =begin pod_to_ignore
83              
84             __compclass__
85             package [% class %];
86              
87             use Moose;
88             use namespace::autoclean;
89              
90             extends 'Catalyst::Model::SMS';
91              
92             __PACKAGE__->config(
93             driver => 'Test',
94             args => {},
95             );
96              
97             __PACKAGE__->meta->make_immutable;
98              
99             1;
100              
101             =head1 NAME
102              
103             [% class %] - SMS Model Class
104              
105             =head1 SYNOPSIS
106              
107             See L<[% app %]>
108              
109             =head1 DESCRIPTION
110              
111             SMS Model Class.
112              
113             =head1 AUTHOR
114              
115             [% author %]
116              
117             =head1 LICENSE
118              
119             This library is free software, you can redistribute it and/or modify
120             it under the same terms as Perl itself.
121              
122             =cut