X-Git-Url: https://git.decadent.org.uk/gitweb/?a=blobdiff_plain;f=lib%2FMaypole%2FView%2FTT.pm;h=21e2485b794a7d3a3fe6f5b694b4aa58a7b1de14;hb=fa0df4df4f23873afa6d992380596406a8e3d78d;hp=15581e8a78cb1a40f2270952c14736391648dd54;hpb=dfcd338e0693370eeaa95ca1f4ef8c742221b348;p=maypole.git diff --git a/lib/Maypole/View/TT.pm b/lib/Maypole/View/TT.pm index 15581e8..21e2485 100644 --- a/lib/Maypole/View/TT.pm +++ b/lib/Maypole/View/TT.pm @@ -1,17 +1,19 @@ package Maypole::View::TT; use base 'Maypole::View::Base'; +use Maypole::Constants; use Template; sub template { - my ($self, $r) = @_; - my $template = Template->new({ INCLUDE_PATH => [ $self->paths($r) ]}); + my ( $self, $r ) = @_; + my $template = Template->new( { INCLUDE_PATH => [ $self->paths($r) ] } ); my $output; - if ($template->process($r->template, { $self->vars($r) }, \$output)) { + if ( $template->process( $r->template, { $self->vars($r) }, \$output ) ) { $r->{output} = $output; - return 1; - } else { + return OK; + } + else { $r->{error} = $template->error; - return 0; + return ERROR; } } @@ -23,7 +25,7 @@ Maypole::View::TT - A Template Toolkit view class for Maypole =head1 SYNOPSIS - BeerDB->config->{view} = "Maypole::View::TT"; # The default anyway + BeerDB->config->view("Maypole::View::TT"); # The default anyway =head1 DESCRIPTION @@ -33,8 +35,19 @@ Please see the Maypole manual, and in particular, the C chapter, for the template variables available and for a refresher on how template components are resolved. +=over 4 + +=item template + + +Processes the template and sets the output. See L + +=back + + =head1 AUTHOR Simon Cozens =cut +