[Catalyst-commits] r12110 - Catalyst-Devel/1.00/branches/helper_refactor/t

[t0m at dev.catalyst.perl.org]

Author: t0m
Date: 2009-12-01 03:28:48 +0000 (Tue, 01 Dec 2009)
New Revision: 12110

Modified:
   Catalyst-Devel/1.00/branches/helper_refactor/t/generated_app.t
Log:
Move the local ENV to the right place

Modified: Catalyst-Devel/1.00/branches/helper_refactor/t/generated_app.t
===================================================================
--- Catalyst-Devel/1.00/branches/helper_refactor/t/generated_app.t	2009-12-01 03:24:12 UTC (rev 12109)
+++ Catalyst-Devel/1.00/branches/helper_refactor/t/generated_app.t	2009-12-01 03:28:48 UTC (rev 12110)
@@ -88,9 +88,6 @@
 my @generated_component_tests;
 
 sub test_fn {
-    local $ENV{TEST_POD} = 1;
-    local $ENV{CATALYST_DEBUG} = 0;
-
     my $fn = shift;
     ok -r $fn, "Have $fn in generated app";
     if ($fn =~ /script/) {
@@ -105,6 +102,8 @@
 }
 
 sub run_generated_component_tests {
+    local $ENV{TEST_POD} = 1;
+    local $ENV{CATALYST_DEBUG} = 0;
     foreach my $fn (@generated_component_tests) {
         subtest "Generated app test: $fn", sub {
             require $fn;