[Catalyst-commits] r11702 - in Catalyst-View-TD/trunk/lib/Catalyst: Helper/View View

[theory at dev.catalyst.perl.org]

Author: theory
Date: 2009-10-31 20:56:21 +0000 (Sat, 31 Oct 2009)
New Revision: 11702

Modified:
   Catalyst-View-TD/trunk/lib/Catalyst/Helper/View/TD.pm
   Catalyst-View-TD/trunk/lib/Catalyst/View/TD.pm
Log:
Tell Template::Declare to be strict by default. Should be handled in the next
release, 0.42.



Modified: Catalyst-View-TD/trunk/lib/Catalyst/Helper/View/TD.pm
===================================================================
--- Catalyst-View-TD/trunk/lib/Catalyst/Helper/View/TD.pm	2009-10-31 20:50:42 UTC (rev 11701)
+++ Catalyst-View-TD/trunk/lib/Catalyst/Helper/View/TD.pm	2009-10-31 20:56:21 UTC (rev 11702)
@@ -83,6 +83,7 @@
 __PACKAGE__->config(
     # dispatch_to     => [qw([% tclass %])],
     # auto_alias      => 1,
+    # strict          => 1,
     # postprocessor   => sub { ... },
     # around_template => sub { ... },
 );

Modified: Catalyst-View-TD/trunk/lib/Catalyst/View/TD.pm
===================================================================
--- Catalyst-View-TD/trunk/lib/Catalyst/View/TD.pm	2009-10-31 20:50:42 UTC (rev 11701)
+++ Catalyst-View-TD/trunk/lib/Catalyst/View/TD.pm	2009-10-31 20:56:21 UTC (rev 11702)
@@ -28,6 +28,7 @@
         root     => MyApp->path_to('root'),
         'View::HTML => {
             dispatch_to     => ['TestApp::TD::HTML'], # Default
+            strict          => 1,
             auto_alias      => 1,
             preprocessor    => sub { ... },
             around_template => sub { ... },
@@ -58,6 +59,7 @@
 sub new {
     my ( $class, $c, $args ) = @_;
     my $config = {
+        strict => 1,
         %{ $class->config },
         %{ $args },
     };
@@ -209,6 +211,7 @@
     __PACKAGE__->config(
         # dispatch_to     => [qw(MyApp::TD::HTML)],
         # auto_alias      => 1,
+        # strict          => 1,
         # postprocessor   => sub { ... },
         # around_template => sub { ... },
     );
@@ -256,6 +259,7 @@
     MyApp::View::TD->config({
         dispatch_to     => [ 'MyApp::TD::HTML' ],
         auto_alias      => 1,
+        strict          => 1,
         postprocessor   => sub { ... },
         around_template => sub { ... },
     });
@@ -271,6 +275,7 @@
         $self->config({
             dispatch_to     => [ 'MyApp::TD::HTML' ],
             auto_alias      => 1,
+            strict          => 1,
             postprocessor   => sub { ... },
             around_template => sub { ... },
         });
@@ -293,6 +298,7 @@
         'View::HTML' => {
             dispatch_to     => [ 'MyApp::TD::HTML' ],
             auto_alias      => 1,
+            strict          => 1,
             postprocessor   => sub { ... },
             around_template => sub { ... },
         },