package Catalyst::Plugin::Test::Headers;
use strict;
+use NEXT;
sub prepare {
my $class = shift;
$c->response->header( 'X-Catalyst-Engine' => $c->engine );
$c->response->header( 'X-Catalyst-Debug' => $c->debug ? 1 : 0 );
-
+
{
my $components = join( ', ', sort keys %{ $c->components } );
$c->response->header( 'X-Catalyst-Components' => $components );