made setting user() and session() backward compatible

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

diff --git a/lib/Maypole/View/TT.pm b/lib/Maypole/View/TT.pm
index 6a3bfe6297471bf8a509f5e3d0b2a84a02d741a8..7d28440137df92a93821074f2082ddd0d4b6b4d4 100644 (file)
--- a/lib/Maypole/View/TT.pm
+++ b/lib/Maypole/View/TT.pm
@@ -3,6 +3,7 @@ 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 = <DATA>; }
@@ -16,7 +17,7 @@ sub template {
   unless ($self->{tt}) {
     my $view_options = $r->config->view_options || {};
     if ($r->debug) {
-      $view_options->{DEBUG} = 'undef';
+      $view_options->{DEBUG} = 0;
     }
     $self->{provider} = Template::Provider->new($view_options);
     $self->{tt}       = Template->new({