package Catalyst::Action::TestAfter;
use strict;
use warnings;
use base qw/Catalyst::Action/;
sub execute {
my $self = shift;
my ( $controller, $c ) = @_;
$self->next::method( @_ );
$c->res->header( 'X-Action-After', $c->stash->{after_message} );
}
1;