X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=catagits%2FCatalyst-Runtime.git;a=blobdiff_plain;f=t%2Faggregate%2Flive_engine_response_emptybody.t;h=beb83fe7d4a4ed4fc6ca70a50046eb487f4c9b57;hp=c4d6dec0c0b46b54fba8779b08e05a087c52341b;hb=35b3434762d426e0cd5e04eb735291f8ca7ea08e;hpb=bcc7361a26b0c7a55eb6b4d49d4622367b12f809 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;