Commit | Line | Data |
---|---|---|
8077080c | 1 | package Catalyst::Helper::View::TT; |
2 | ||
3 | use strict; | |
8077080c | 4 | |
5 | =head1 NAME | |
6 | ||
7 | Catalyst::Helper::View::TT - Helper for TT Views | |
8 | ||
9 | =head1 SYNOPSIS | |
10 | ||
c90b1329 | 11 | script/create.pl view TT TT |
8077080c | 12 | |
13 | =head1 DESCRIPTION | |
14 | ||
15 | Helper for TT Views. | |
16 | ||
17 | =head2 METHODS | |
18 | ||
19 | =head3 mk_compclass | |
20 | ||
21 | =cut | |
22 | ||
23 | sub mk_compclass { | |
24 | my ( $self, $helper ) = @_; | |
d97e9999 | 25 | my $file = $helper->{file}; |
dc617c0e | 26 | $helper->render_file( 'compclass', $file ); |
d97e9999 | 27 | } |
8077080c | 28 | |
d97e9999 | 29 | =head1 SEE ALSO |
8077080c | 30 | |
d97e9999 | 31 | L<Catalyst::Manual>, L<Catalyst::Test>, L<Catalyst::Request>, |
32 | L<Catalyst::Response>, L<Catalyst::Helper> | |
8077080c | 33 | |
34 | =head1 AUTHOR | |
35 | ||
d97e9999 | 36 | Sebastian Riedel, C<sri@oook.de> |
8077080c | 37 | |
38 | =head1 LICENSE | |
39 | ||
7bee9bfc | 40 | This library is free software . You can redistribute it and/or modify |
41 | it under the same terms as perl itself. | |
8077080c | 42 | |
43 | =cut | |
44 | ||
45 | 1; | |
8077080c | 46 | |
d97e9999 | 47 | __DATA__ |
8077080c | 48 | |
d97e9999 | 49 | __compclass__ |
50 | package [% class %]; | |
51 | ||
52 | use strict; | |
53 | use base 'Catalyst::View::TT'; | |
54 | ||
55 | =head1 NAME | |
56 | ||
57 | [% class %] - TT View Component | |
58 | ||
59 | =head1 SYNOPSIS | |
60 | ||
76c52c6e | 61 | See L<[% app %]> |
d97e9999 | 62 | |
63 | =head1 DESCRIPTION | |
64 | ||
76c52c6e | 65 | TT View Component. |
8077080c | 66 | |
67 | =head1 AUTHOR | |
68 | ||
bd9d89ad | 69 | [% author %] |
8077080c | 70 | |
71 | =head1 LICENSE | |
72 | ||
7bee9bfc | 73 | This library is free software . You can redistribute it and/or modify |
74 | it under the same terms as perl itself. | |
8077080c | 75 | |
76 | =cut | |
77 | ||
78 | 1; |