fix lwp backend authentication verif

This commit is contained in:
Colin Gagnaire 2019-04-17 14:16:25 +02:00
parent a2b6aeb278
commit 1df6a5372c
1 changed files with 3 additions and 2 deletions

View File

@ -241,8 +241,9 @@ sub request {
if (!$self->{output}->is_status(value => $status, compare => 'ok', litteral => 1)) { if (!$self->{output}->is_status(value => $status, compare => 'ok', litteral => 1)) {
my $short_msg = $self->{response}->status_line; my $short_msg = $self->{response}->status_line;
if ($short_msg =~ /^401/) { if ($short_msg =~ /^401/) {
my ($authenticate) = $self->{response}->www_authenticate =~ /(\S+)/; my $authenticate = '';
$short_msg .= ' (' . $authenticate . ' authentication expected)'; $short_msg .= ' (' . $1 . ' authentication expected)' if (defined($self->{response}->www_authenticate) &&
$self->{response}->www_authenticate =~ /(\S+)/);
} }
$self->{output}->output_add(long_msg => $self->{response}->content, debug => 1); $self->{output}->output_add(long_msg => $self->{response}->content, debug => 1);