1 package TestApp::Context;
3 extends 'Catalyst::Context';
5 if (eval { Class::MOP::load_class('CatalystX::LeakChecker'); 1 }) {
6 with 'CatalystX::LeakChecker';
10 default => sub { [] },
15 my ($ctx, @leaks) = @_;
16 push @{ $ctx->leaks }, @leaks;
21 return scalar @{ $ctx->leaks };