X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=catagits%2FCatalyst-Runtime.git;a=blobdiff_plain;f=t%2Fplack-middleware.t;h=4cc3e72d1ec9049bc52e8b5a4e4118bb75daed97;hp=0693d88f7c7b8cdda6cf87fad9e31f7f0bb54dd8;hb=10e392678f09e8b9614aa0042113921ba5bff963;hpb=c17c004aa78ef1280963f76abff75224343d71a8 diff --git a/t/plack-middleware.t b/t/plack-middleware.t index 0693d88..4cc3e72 100644 --- a/t/plack-middleware.t +++ b/t/plack-middleware.t @@ -1,11 +1,14 @@ #!/usr/bin/env perl +use warnings; +use strict; + use FindBin; -use Test::Most; +use Test::More; use HTTP::Request::Common; use lib "$FindBin::Bin/lib"; -use Catalyst::Test 'TestApp'; +use Catalyst::Test 'TestMiddleware'; ok my($res, $c) = ctx_request('/'); @@ -47,5 +50,8 @@ ok my($res, $c) = ctx_request('/'); like $response->content, qr'forced message', 'expected content body'; + + ok $response->headers->{"x-runtime"}, "Got value for expected middleware"; } + done_testing;