X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=catagits%2FCatalyst-Runtime.git;a=blobdiff_plain;f=t%2Flive%2Flib%2FTestApp.pm;h=974e9f3759973086812a0c745044e3d190fba1c8;hp=95d77e22d9b9e6c0a47cba00ae398492eecec26e;hb=ba599d1c7a0c3219cd3825264c44d22362ed179a;hpb=fe9da43b6e3d56a319467179c17b5e0c4b272b8a diff --git a/t/live/lib/TestApp.pm b/t/live/lib/TestApp.pm index 95d77e2..974e9f3 100644 --- a/t/live/lib/TestApp.pm +++ b/t/live/lib/TestApp.pm @@ -34,7 +34,7 @@ sub execute { $method = $1; } - if ( $class && $method ) { + if ( $class && $method && $method !~ /^_/ ) { my $executed = sprintf( "%s->%s", $class, $method ); my @executed = $c->response->headers->header('X-Catalyst-Executed'); push @executed, $executed;