fix applied for http://rt.cpan.org/Ticket/Display.html?id=14661

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

diff --git a/lib/Maypole/View/TT.pm b/lib/Maypole/View/TT.pm
index 59c3f8fe888388b26dbf969e14fadd6288c43ec6..45fd5e428c8e8b4a3ea8b4b90b6014df6b1c56df 100644 (file)
--- a/lib/Maypole/View/TT.pm
+++ b/lib/Maypole/View/TT.pm
@@ -21,13 +21,17 @@ sub template {
 
     $self->{provider}->include_path([ $self->paths($r) ]);
 
+    my $template_file = $r->template;
+    my $ext = $r->config->template_extension;
+    $template_file .= $ext if defined $ext;
+
     my $output;
-    if ($self->{tt}->process( $r->template, { $self->vars($r) }, \$output )) {
+    if ($self->{tt}->process($template_file, { $self->vars($r) }, \$output )) {
         $r->{output} = $output;
         return OK;
     }
     else {
-        $r->{error} = $self->{tt}->error;
+       $r->{error} = "TT error for template '$template_file'\n" . $self->{tt}->error;
         return ERROR;
     }
 }