[Catalyst-commits] r12639 - in Catalyst-Runtime/5.80/trunk/t: . lib

[rafl at dev.catalyst.perl.org]

Author: rafl
Date: 2010-01-14 05:45:09 +0000 (Thu, 14 Jan 2010)
New Revision: 12639

Modified:
   Catalyst-Runtime/5.80/trunk/t/lib/TestApp.pm
   Catalyst-Runtime/5.80/trunk/t/live_component_controller_context_closure.t
Log:
Only set up the leakchecker for the tests that need it.

That way we avoid the useless Devel::Cycle glob warnings.

Modified: Catalyst-Runtime/5.80/trunk/t/lib/TestApp.pm
===================================================================
--- Catalyst-Runtime/5.80/trunk/t/lib/TestApp.pm	2010-01-14 05:21:24 UTC (rev 12638)
+++ Catalyst-Runtime/5.80/trunk/t/lib/TestApp.pm	2010-01-14 05:45:09 UTC (rev 12639)
@@ -20,7 +20,7 @@
 
 TestApp->config( name => 'TestApp', root => '/some/dir' );
 
-if (eval { Class::MOP::load_class('CatalystX::LeakChecker'); 1 }) {
+if ($::setup_leakchecker && eval { Class::MOP::load_class('CatalystX::LeakChecker'); 1 }) {
     with 'CatalystX::LeakChecker';
 
     has leaks => (

Modified: Catalyst-Runtime/5.80/trunk/t/live_component_controller_context_closure.t
===================================================================
--- Catalyst-Runtime/5.80/trunk/t/live_component_controller_context_closure.t	2010-01-14 05:21:24 UTC (rev 12638)
+++ Catalyst-Runtime/5.80/trunk/t/live_component_controller_context_closure.t	2010-01-14 05:45:09 UTC (rev 12639)
@@ -13,6 +13,8 @@
 use FindBin;
 use lib "$FindBin::Bin/lib";
 
+BEGIN { $::setup_leakchecker = 1 }
+
 use Catalyst::Test 'TestApp';
 
 {