X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Faggregate%2Flive_engine_response_emptybody.t;h=beb83fe7d4a4ed4fc6ca70a50046eb487f4c9b57;hb=f152ae23b886a4f0bcfaeaf401ea2bf71cd30ab1;hp=c4d6dec0c0b46b54fba8779b08e05a087c52341b;hpb=bcc7361a26b0c7a55eb6b4d49d4622367b12f809;p=catagits%2FCatalyst-Runtime.git diff --git a/t/aggregate/live_engine_response_emptybody.t b/t/aggregate/live_engine_response_emptybody.t index c4d6dec..beb83fe 100644 --- a/t/aggregate/live_engine_response_emptybody.t +++ b/t/aggregate/live_engine_response_emptybody.t @@ -1,5 +1,3 @@ -#!perl - use strict; use warnings; @@ -20,7 +18,7 @@ use Catalyst::Test 'TestApp'; { my $res = request('/emptybody'); is $res->content, ''; - ok !$res->header('Content-Length'); + ok !defined $res->header('Content-Length'); } done_testing;