Improve unit test (#2618)
This commit is contained in:
parent
aec371f66a
commit
c5c1c76415
|
@ -78,6 +78,10 @@ no warnings 'redefine';
|
|||
|
||||
sub LWP::UserAgent::request {
|
||||
my ( $self, $req ) = @_;
|
||||
ok( $req->header('host') eq 'devops.example.com',
|
||||
'Host header found' )
|
||||
or explain( $req->headers(), 'Header' );
|
||||
count(1);
|
||||
my $httpResp;
|
||||
my $s = '{
|
||||
"rules": {
|
||||
|
|
Loading…
Reference in New Issue
Block a user