-
- $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;
- my $processed_ok = eval{$self->{tt}->process($template_file, { $self->vars($r) }, \$output );};
- if ($processed_ok) {
- $r->{output} = $output;
- return OK;
+ $self->{provider} = Template::Provider->new($view_options);
+ $self->{tt} = Template->new({
+ %$view_options,
+ LOAD_TEMPLATES => [ $self->{provider} ],
+ });
+ }
+
+ $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;
+ my $processed_ok = eval{$self->{tt}->process($template_file, { $self->vars($r) }, \$output );};
+ if ($processed_ok) {
+ $r->{output} = $output;
+ return OK;
+ } else {
+ if ($@) {
+ my $error = "fatal error in template '$template_file' : $@\nTT paths : " . join(', ',$self->paths($r)) . "\n";
+ $r->warn($error);
+ $r->{error} = $error;