X-Git-Url: https://git.decadent.org.uk/gitweb/?a=blobdiff_plain;f=lib%2FMaypole%2FView%2FTT.pm;h=7d28440137df92a93821074f2082ddd0d4b6b4d4;hb=1ec67be9e8b738cbd2a523523af3bd7e61f98480;hp=936fcc51fc8fa7668a3a5a29b3a7d8bfb4cedc41;hpb=8e96ebeddb37ef30d2e215f935e136a9170576cd;p=maypole.git diff --git a/lib/Maypole/View/TT.pm b/lib/Maypole/View/TT.pm index 936fcc5..7d28440 100644 --- a/lib/Maypole/View/TT.pm +++ b/lib/Maypole/View/TT.pm @@ -1,14 +1,14 @@ package Maypole::View::TT; -use Class::C3; use base 'Maypole::View::Base'; use Maypole::Constants; use Template; use File::Spec::Functions qw(catdir tmpdir); +use Data::Dumper; our $error_template; { local $/; $error_template = ; } -our $VERSION = '2.11'; +our $VERSION = '2.12'; use strict; @@ -16,6 +16,9 @@ sub template { my ( $self, $r ) = @_; unless ($self->{tt}) { my $view_options = $r->config->view_options || {}; + if ($r->debug) { + $view_options->{DEBUG} = 0; + } $self->{provider} = Template::Provider->new($view_options); $self->{tt} = Template->new({ %$view_options,