applied patch from nicg : Modified MVC.pm to correct problem with LocationMatch and...

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

diff --git a/lib/Maypole/View/TT.pm b/lib/Maypole/View/TT.pm
index 936fcc51fc8fa7668a3a5a29b3a7d8bfb4cedc41..d2da45a59d0b643e4ec4f2c322af717b595140e3 100644 (file)
--- a/lib/Maypole/View/TT.pm
+++ b/lib/Maypole/View/TT.pm
@@ -8,7 +8,7 @@ use File::Spec::Functions qw(catdir tmpdir);
 our $error_template;
 { local $/; $error_template = <DATA>; }
 
-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} = 'undef';
+    }
     $self->{provider} = Template::Provider->new($view_options);
     $self->{tt}       = Template->new({
                                       %$view_options,