Skip to content

Commit b32efe3

Browse files
committed
better diagnostics in case of failures in apache.t
1 parent 9b568ed commit b32efe3

File tree

1 file changed

+3
-1
lines changed

1 file changed

+3
-1
lines changed

t/apache.t

Lines changed: 3 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -8,11 +8,13 @@ use LWP::UserAgent;
88
my $ua = LWP::UserAgent->new();
99
plan skip_all => "Not online" unless $ua->is_online;
1010

11-
plan tests => 4;
11+
plan tests => 5;
1212

1313
my $res = $ua->simple_request(HTTP::Request->new(GET => "https://www.apache.org"));
1414

1515
ok($res->is_success);
16+
my $h = $res->header( 'X-Died' );
17+
is($h, undef, "no X-Died header");
1618
like($res->content, qr/Apache Software Foundation/);
1719

1820
# test for RT #81948

0 commit comments

Comments
 (0)