http://www.template-toolkit.org/pipermail/templates/2004-December/006983.html
git-svn-id: http://svn.maypole.perl.org/Maypole/trunk@321
48953598-375a-da11-a14b-
00016c27c3ee
unless ($self->{tt}) {
my $view_options = $r->config->view_options || {};
unless ($self->{tt}) {
my $view_options = $r->config->view_options || {};
- (my $driver_name = ref $r) =~ s/::/_/g;
- my $compile_dir = catdir(tmpdir(), $driver_name);
- $self->{provider} = Template::Provider->new(
- COMPILE_DIR => $compile_dir,
- %$view_options,
- );
+ $self->{provider} = Template::Provider->new($view_options);
$self->{tt} = Template->new({
$self->{tt} = Template->new({
- COMPILE_DIR => $compile_dir,
%$view_options,
LOAD_TEMPLATES => [ $self->{provider} ],
});
%$view_options,
LOAD_TEMPLATES => [ $self->{provider} ],
});