X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Flive_component_controller_context_closure.t;h=2d4b894e25e28350c9a1e14ffe2b47c6acf12ce0;hb=501860b226f5c62a542d4e2def85585943a9aacd;hp=767822d44a477ef82b583c3e2d4a5c98823961de;hpb=da1c9ff88c099e16c4771020f4b175c2b77a1dad;p=catagits%2FCatalyst-Runtime.git diff --git a/t/live_component_controller_context_closure.t b/t/live_component_controller_context_closure.t index 767822d..2d4b894 100644 --- a/t/live_component_controller_context_closure.t +++ b/t/live_component_controller_context_closure.t @@ -7,14 +7,14 @@ BEGIN { plan skip_all => 'CatalystX::LeakChecker 0.05 required for this test'; } - plan tests => 4; + plan tests => 6; } use FindBin; use lib "$FindBin::Bin/lib"; BEGIN { $::setup_leakchecker = 1 } - +local $SIG{__WARN__} = sub { return if $_[0] =~ /Unhandled type: GLOB/; warn $_[0] }; use Catalyst::Test 'TestApp'; { @@ -28,3 +28,9 @@ use Catalyst::Test 'TestApp'; ok($resp->is_success); is($ctx->count_leaks, 0); } + +{ + my ($resp, $ctx) = ctx_request('/contextclosure/non_closure'); + ok($resp->is_success); + is($ctx->count_leaks, 0); +}