X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=catagits%2FCatalyst-Runtime.git;a=blobdiff_plain;f=t%2Flive_component_controller_context_closure.t;h=ff0bbe91f14082882daf529d1184237fb88fbb47;hp=fc0d6227ef94007ca530cbd030b74b762b18f0d4;hb=HEAD;hpb=dda0beb4216434d5ac0b7cfdc7e4513aeeeb4339 diff --git a/t/live_component_controller_context_closure.t b/t/live_component_controller_context_closure.t index fc0d622..ff0bbe9 100644 --- a/t/live_component_controller_context_closure.t +++ b/t/live_component_controller_context_closure.t @@ -3,8 +3,8 @@ use warnings; use Test::More; BEGIN { - unless (eval 'use CatalystX::LeakChecker 0.05; 1') { - plan skip_all => 'CatalystX::LeakChecker 0.05 required for this test'; + unless (eval 'use Devel::Cycle 1.11; 1') { + plan skip_all => 'Devel::Cycle 1.11 required for this test'; } plan tests => 6; @@ -14,7 +14,7 @@ use FindBin; use lib "$FindBin::Bin/lib"; BEGIN { $::setup_leakchecker = 1 } -local $SIG{__WARN__} = sub { return if $_[0] =~ /Unhandled type: GLOB/; warn $_[0] }; +local $SIG{__WARN__} = sub { return if $_[0] =~ /Unhandled type: (GLOB|REGEXP)/; warn $_[0] }; use Catalyst::Test 'TestApp'; { @@ -22,7 +22,9 @@ use Catalyst::Test 'TestApp'; ok($resp->is_success); #is($ctx->count_leaks, 1); # FIXME: find out why this changed from 1 to 2 after 52af51596d - is($ctx->count_leaks, 2); + # ^^ probably has something to do with env being in Engine and Request - JNAP + # ^^ I made the env in Engine a weak ref, should help until we can remove it + is($ctx->count_leaks, 1); } {