view exceptions and some code cleaning

[maypole.git] / lib / Maypole / View / TT.pm

diff --git a/lib/Maypole/View/TT.pm b/lib/Maypole/View/TT.pm
index 0e8d89fbc1b2476f992c7aee9c57a1f7eafd3ea3..9142f3ebe51bdbda78ffbde8f2a37e5de11f9f50 100644 (file)
--- a/lib/Maypole/View/TT.pm
+++ b/lib/Maypole/View/TT.pm
@@ -4,13 +4,14 @@ 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 OK;
-    } else {
+    }
+    else {
         $r->{error} = $template->error;
         return ERROR;
     }
@@ -39,3 +40,4 @@ components are resolved.
 Simon Cozens
 
 =cut
+