Hello community,
here is the log from the commit of package perl-libwww-perl for
openSUSE:Factory checked in at 2019-12-02 11:31:47
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Comparing /work/SRC/openSUSE:Factory/perl-libwww-perl (Old)
and /work/SRC/openSUSE:Factory/.perl-libwww-perl.new.4691 (New)
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Package is "perl-libwww-perl"
Mon Dec 2 11:31:47 2019 rev:64 rq:751309 version:6.43
Changes:
--------
--- /work/SRC/openSUSE:Factory/perl-libwww-perl/perl-libwww-perl.changes
2019-11-25 11:21:55.394131284 +0100
+++
/work/SRC/openSUSE:Factory/.perl-libwww-perl.new.4691/perl-libwww-perl.changes
2019-12-02 11:36:49.354441505 +0100
@@ -1,0 +2,10 @@
+Wed Nov 27 03:05:37 UTC 2019 - <timueller+p...@suse.de>
+
+- updated to 6.43
+ see /usr/share/doc/packages/perl-libwww-perl/Changes
+
+ 6.43 2019-11-26 13:54:43Z
+ - Continue trying different Authentication challenge schemes if
+ credentials are wrong (Roman Galeev, Julien Fiegehenn)
+
+-------------------------------------------------------------------
Old:
----
libwww-perl-6.42.tar.gz
New:
----
libwww-perl-6.43.tar.gz
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Other differences:
------------------
++++++ perl-libwww-perl.spec ++++++
--- /var/tmp/diff_new_pack.w5tvE7/_old 2019-12-02 11:36:50.870441825 +0100
+++ /var/tmp/diff_new_pack.w5tvE7/_new 2019-12-02 11:36:50.874441825 +0100
@@ -17,7 +17,7 @@
Name: perl-libwww-perl
-Version: 6.42
+Version: 6.43
Release: 0
%define cpan_name libwww-perl
Summary: The World-Wide Web library for Perl
++++++ libwww-perl-6.42.tar.gz -> libwww-perl-6.43.tar.gz ++++++
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/libwww-perl-6.42/Changes new/libwww-perl-6.43/Changes
--- old/libwww-perl-6.42/Changes 2019-11-20 18:40:55.000000000 +0100
+++ new/libwww-perl-6.43/Changes 2019-11-26 14:54:46.000000000 +0100
@@ -1,5 +1,9 @@
Change history for libwww-perl
+6.43 2019-11-26 13:54:43Z
+ - Continue trying different Authentication challenge schemes if
+ credentials are wrong (Roman Galeev, Julien Fiegehenn)
+
6.42 2019-11-20 17:40:52Z
- Add retry handling for a stale nonce with digest authentication (marmotil
and Frank Maas) (GH#40, GH#313, GH#321)
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/libwww-perl-6.42/META.json
new/libwww-perl-6.43/META.json
--- old/libwww-perl-6.42/META.json 2019-11-20 18:40:55.000000000 +0100
+++ new/libwww-perl-6.43/META.json 2019-11-26 14:54:46.000000000 +0100
@@ -109,96 +109,96 @@
"provides" : {
"LWP" : {
"file" : "lib/LWP.pm",
- "version" : "6.42"
+ "version" : "6.43"
},
"LWP::Authen::Basic" : {
"file" : "lib/LWP/Authen/Basic.pm",
- "version" : "6.42"
+ "version" : "6.43"
},
"LWP::Authen::Digest" : {
"file" : "lib/LWP/Authen/Digest.pm",
- "version" : "6.42"
+ "version" : "6.43"
},
"LWP::Authen::Ntlm" : {
"file" : "lib/LWP/Authen/Ntlm.pm",
- "version" : "6.42"
+ "version" : "6.43"
},
"LWP::ConnCache" : {
"file" : "lib/LWP/ConnCache.pm",
- "version" : "6.42"
+ "version" : "6.43"
},
"LWP::Debug" : {
"file" : "lib/LWP/Debug.pm",
- "version" : "6.42",
+ "version" : "6.43",
"x_deprecated" : 1
},
"LWP::Debug::TraceHTTP" : {
"file" : "lib/LWP/Debug/TraceHTTP.pm",
- "version" : "6.42"
+ "version" : "6.43"
},
"LWP::DebugFile" : {
"file" : "lib/LWP/DebugFile.pm",
- "version" : "6.42"
+ "version" : "6.43"
},
"LWP::MemberMixin" : {
"file" : "lib/LWP/MemberMixin.pm",
- "version" : "6.42"
+ "version" : "6.43"
},
"LWP::Protocol" : {
"file" : "lib/LWP/Protocol.pm",
- "version" : "6.42"
+ "version" : "6.43"
},
"LWP::Protocol::cpan" : {
"file" : "lib/LWP/Protocol/cpan.pm",
- "version" : "6.42"
+ "version" : "6.43"
},
"LWP::Protocol::data" : {
"file" : "lib/LWP/Protocol/data.pm",
- "version" : "6.42"
+ "version" : "6.43"
},
"LWP::Protocol::file" : {
"file" : "lib/LWP/Protocol/file.pm",
- "version" : "6.42"
+ "version" : "6.43"
},
"LWP::Protocol::ftp" : {
"file" : "lib/LWP/Protocol/ftp.pm",
- "version" : "6.42"
+ "version" : "6.43"
},
"LWP::Protocol::gopher" : {
"file" : "lib/LWP/Protocol/gopher.pm",
- "version" : "6.42"
+ "version" : "6.43"
},
"LWP::Protocol::http" : {
"file" : "lib/LWP/Protocol/http.pm",
- "version" : "6.42"
+ "version" : "6.43"
},
"LWP::Protocol::loopback" : {
"file" : "lib/LWP/Protocol/loopback.pm",
- "version" : "6.42"
+ "version" : "6.43"
},
"LWP::Protocol::mailto" : {
"file" : "lib/LWP/Protocol/mailto.pm",
- "version" : "6.42"
+ "version" : "6.43"
},
"LWP::Protocol::nntp" : {
"file" : "lib/LWP/Protocol/nntp.pm",
- "version" : "6.42"
+ "version" : "6.43"
},
"LWP::Protocol::nogo" : {
"file" : "lib/LWP/Protocol/nogo.pm",
- "version" : "6.42"
+ "version" : "6.43"
},
"LWP::RobotUA" : {
"file" : "lib/LWP/RobotUA.pm",
- "version" : "6.42"
+ "version" : "6.43"
},
"LWP::Simple" : {
"file" : "lib/LWP/Simple.pm",
- "version" : "6.42"
+ "version" : "6.43"
},
"LWP::UserAgent" : {
"file" : "lib/LWP/UserAgent.pm",
- "version" : "6.42"
+ "version" : "6.43"
}
},
"release_status" : "stable",
@@ -215,7 +215,7 @@
"x_IRC" : "irc://irc.perl.org/#lwp",
"x_MailingList" : "mailto:lib...@perl.org";
},
- "version" : "6.42",
+ "version" : "6.43",
"x_Dist_Zilla" : {
"perl" : {
"version" : "5.030000"
@@ -780,7 +780,7 @@
"branch" : null,
"changelog" : "Changes",
"signed" : 0,
- "tag" : "v6.42",
+ "tag" : "v6.43",
"tag_format" : "v%V",
"tag_message" : "v%V"
},
@@ -1003,6 +1003,7 @@
"Piotr Roszatycki <piotr.roszaty...@gmail.com>",
"Robert Stone <ta...@trap.mtview.ca.us>",
"Rolf Grossmann <r...@progtech.net>",
+ "Roman Galeev <roman.gal...@gooddata.com>",
"ruff <r...@ukrpost.net>",
"sasao <sa...@yugen.org>",
"Sean M. Burke <sbu...@cpan.org>",
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/libwww-perl-6.42/META.yml
new/libwww-perl-6.43/META.yml
--- old/libwww-perl-6.42/META.yml 2019-11-20 18:40:55.000000000 +0100
+++ new/libwww-perl-6.43/META.yml 2019-11-26 14:54:46.000000000 +0100
@@ -30,74 +30,74 @@
provides:
LWP:
file: lib/LWP.pm
- version: '6.42'
+ version: '6.43'
LWP::Authen::Basic:
file: lib/LWP/Authen/Basic.pm
- version: '6.42'
+ version: '6.43'
LWP::Authen::Digest:
file: lib/LWP/Authen/Digest.pm
- version: '6.42'
+ version: '6.43'
LWP::Authen::Ntlm:
file: lib/LWP/Authen/Ntlm.pm
- version: '6.42'
+ version: '6.43'
LWP::ConnCache:
file: lib/LWP/ConnCache.pm
- version: '6.42'
+ version: '6.43'
LWP::Debug:
file: lib/LWP/Debug.pm
- version: '6.42'
+ version: '6.43'
x_deprecated: 1
LWP::Debug::TraceHTTP:
file: lib/LWP/Debug/TraceHTTP.pm
- version: '6.42'
+ version: '6.43'
LWP::DebugFile:
file: lib/LWP/DebugFile.pm
- version: '6.42'
+ version: '6.43'
LWP::MemberMixin:
file: lib/LWP/MemberMixin.pm
- version: '6.42'
+ version: '6.43'
LWP::Protocol:
file: lib/LWP/Protocol.pm
- version: '6.42'
+ version: '6.43'
LWP::Protocol::cpan:
file: lib/LWP/Protocol/cpan.pm
- version: '6.42'
+ version: '6.43'
LWP::Protocol::data:
file: lib/LWP/Protocol/data.pm
- version: '6.42'
+ version: '6.43'
LWP::Protocol::file:
file: lib/LWP/Protocol/file.pm
- version: '6.42'
+ version: '6.43'
LWP::Protocol::ftp:
file: lib/LWP/Protocol/ftp.pm
- version: '6.42'
+ version: '6.43'
LWP::Protocol::gopher:
file: lib/LWP/Protocol/gopher.pm
- version: '6.42'
+ version: '6.43'
LWP::Protocol::http:
file: lib/LWP/Protocol/http.pm
- version: '6.42'
+ version: '6.43'
LWP::Protocol::loopback:
file: lib/LWP/Protocol/loopback.pm
- version: '6.42'
+ version: '6.43'
LWP::Protocol::mailto:
file: lib/LWP/Protocol/mailto.pm
- version: '6.42'
+ version: '6.43'
LWP::Protocol::nntp:
file: lib/LWP/Protocol/nntp.pm
- version: '6.42'
+ version: '6.43'
LWP::Protocol::nogo:
file: lib/LWP/Protocol/nogo.pm
- version: '6.42'
+ version: '6.43'
LWP::RobotUA:
file: lib/LWP/RobotUA.pm
- version: '6.42'
+ version: '6.43'
LWP::Simple:
file: lib/LWP/Simple.pm
- version: '6.42'
+ version: '6.43'
LWP::UserAgent:
file: lib/LWP/UserAgent.pm
- version: '6.42'
+ version: '6.43'
requires:
Digest::MD5: '0'
Encode: '2.12'
@@ -134,7 +134,7 @@
bugtracker: https://github.com/libwww-perl/libwww-perl/issues
homepage: https://github.com/libwww-perl/libwww-perl
repository: https://github.com/libwww-perl/libwww-perl.git
-version: '6.42'
+version: '6.43'
x_Dist_Zilla:
perl:
version: '5.030000'
@@ -591,7 +591,7 @@
branch: ~
changelog: Changes
signed: 0
- tag: v6.42
+ tag: v6.43
tag_format: v%V
tag_message: v%V
Dist::Zilla::Role::Git::Repo:
@@ -775,6 +775,7 @@
- 'Piotr Roszatycki <piotr.roszaty...@gmail.com>'
- 'Robert Stone <ta...@trap.mtview.ca.us>'
- 'Rolf Grossmann <r...@progtech.net>'
+ - 'Roman Galeev <roman.gal...@gooddata.com>'
- 'ruff <r...@ukrpost.net>'
- 'sasao <sa...@yugen.org>'
- 'Sean M. Burke <sbu...@cpan.org>'
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/libwww-perl-6.42/Makefile.PL
new/libwww-perl-6.43/Makefile.PL
--- old/libwww-perl-6.42/Makefile.PL 2019-11-20 18:40:55.000000000 +0100
+++ new/libwww-perl-6.43/Makefile.PL 2019-11-26 14:54:46.000000000 +0100
@@ -86,7 +86,7 @@
"Test::Needs" => 0,
"Test::RequiresInternet" => 0
},
- "VERSION" => "6.42",
+ "VERSION" => "6.43",
"test" => {
"TESTS" => "t/*.t t/base/*.t t/base/protocols/*.t t/leak/*.t t/local/*.t
t/robot/*.t"
}
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/libwww-perl-6.42/lib/LWP/Authen/Basic.pm
new/libwww-perl-6.43/lib/LWP/Authen/Basic.pm
--- old/libwww-perl-6.42/lib/LWP/Authen/Basic.pm 2019-11-20
18:40:55.000000000 +0100
+++ new/libwww-perl-6.43/lib/LWP/Authen/Basic.pm 2019-11-26
14:54:46.000000000 +0100
@@ -2,7 +2,7 @@
use strict;
-our $VERSION = '6.42';
+our $VERSION = '6.43';
require MIME::Base64;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/libwww-perl-6.42/lib/LWP/Authen/Digest.pm
new/libwww-perl-6.43/lib/LWP/Authen/Digest.pm
--- old/libwww-perl-6.42/lib/LWP/Authen/Digest.pm 2019-11-20
18:40:55.000000000 +0100
+++ new/libwww-perl-6.43/lib/LWP/Authen/Digest.pm 2019-11-26
14:54:46.000000000 +0100
@@ -3,7 +3,7 @@
use strict;
use base 'LWP::Authen::Basic';
-our $VERSION = '6.42';
+our $VERSION = '6.43';
require Digest::MD5;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/libwww-perl-6.42/lib/LWP/Authen/Ntlm.pm
new/libwww-perl-6.43/lib/LWP/Authen/Ntlm.pm
--- old/libwww-perl-6.42/lib/LWP/Authen/Ntlm.pm 2019-11-20 18:40:55.000000000
+0100
+++ new/libwww-perl-6.43/lib/LWP/Authen/Ntlm.pm 2019-11-26 14:54:46.000000000
+0100
@@ -2,7 +2,7 @@
use strict;
-our $VERSION = '6.42';
+our $VERSION = '6.43';
use Authen::NTLM "1.02";
use MIME::Base64 "2.12";
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/libwww-perl-6.42/lib/LWP/ConnCache.pm
new/libwww-perl-6.43/lib/LWP/ConnCache.pm
--- old/libwww-perl-6.42/lib/LWP/ConnCache.pm 2019-11-20 18:40:55.000000000
+0100
+++ new/libwww-perl-6.43/lib/LWP/ConnCache.pm 2019-11-26 14:54:46.000000000
+0100
@@ -2,7 +2,7 @@
use strict;
-our $VERSION = '6.42';
+our $VERSION = '6.43';
our $DEBUG;
sub new {
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/libwww-perl-6.42/lib/LWP/Debug/TraceHTTP.pm
new/libwww-perl-6.43/lib/LWP/Debug/TraceHTTP.pm
--- old/libwww-perl-6.42/lib/LWP/Debug/TraceHTTP.pm 2019-11-20
18:40:55.000000000 +0100
+++ new/libwww-perl-6.43/lib/LWP/Debug/TraceHTTP.pm 2019-11-26
14:54:46.000000000 +0100
@@ -11,7 +11,7 @@
use strict;
use base 'LWP::Protocol::http';
-our $VERSION = '6.42';
+our $VERSION = '6.43';
package # hide from PAUSE
LWP::Debug::TraceHTTP::Socket;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/libwww-perl-6.42/lib/LWP/Debug.pm
new/libwww-perl-6.43/lib/LWP/Debug.pm
--- old/libwww-perl-6.42/lib/LWP/Debug.pm 2019-11-20 18:40:55.000000000
+0100
+++ new/libwww-perl-6.43/lib/LWP/Debug.pm 2019-11-26 14:54:46.000000000
+0100
@@ -1,6 +1,6 @@
package LWP::Debug; # legacy
-our $VERSION = '6.42';
+our $VERSION = '6.43';
require Exporter;
our @ISA = qw(Exporter);
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/libwww-perl-6.42/lib/LWP/DebugFile.pm
new/libwww-perl-6.43/lib/LWP/DebugFile.pm
--- old/libwww-perl-6.42/lib/LWP/DebugFile.pm 2019-11-20 18:40:55.000000000
+0100
+++ new/libwww-perl-6.43/lib/LWP/DebugFile.pm 2019-11-26 14:54:46.000000000
+0100
@@ -1,6 +1,6 @@
package LWP::DebugFile;
-our $VERSION = '6.42';
+our $VERSION = '6.43';
# legacy stub
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/libwww-perl-6.42/lib/LWP/MemberMixin.pm
new/libwww-perl-6.43/lib/LWP/MemberMixin.pm
--- old/libwww-perl-6.42/lib/LWP/MemberMixin.pm 2019-11-20 18:40:55.000000000
+0100
+++ new/libwww-perl-6.43/lib/LWP/MemberMixin.pm 2019-11-26 14:54:46.000000000
+0100
@@ -1,6 +1,6 @@
package LWP::MemberMixin;
-our $VERSION = '6.42';
+our $VERSION = '6.43';
sub _elem {
my $self = shift;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/libwww-perl-6.42/lib/LWP/Protocol/cpan.pm
new/libwww-perl-6.43/lib/LWP/Protocol/cpan.pm
--- old/libwww-perl-6.42/lib/LWP/Protocol/cpan.pm 2019-11-20
18:40:55.000000000 +0100
+++ new/libwww-perl-6.43/lib/LWP/Protocol/cpan.pm 2019-11-26
14:54:46.000000000 +0100
@@ -4,7 +4,7 @@
use base qw(LWP::Protocol);
-our $VERSION = '6.42';
+our $VERSION = '6.43';
require URI;
require HTTP::Status;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/libwww-perl-6.42/lib/LWP/Protocol/data.pm
new/libwww-perl-6.43/lib/LWP/Protocol/data.pm
--- old/libwww-perl-6.42/lib/LWP/Protocol/data.pm 2019-11-20
18:40:55.000000000 +0100
+++ new/libwww-perl-6.43/lib/LWP/Protocol/data.pm 2019-11-26
14:54:46.000000000 +0100
@@ -4,7 +4,7 @@
use strict;
-our $VERSION = '6.42';
+our $VERSION = '6.43';
require HTTP::Response;
require HTTP::Status;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/libwww-perl-6.42/lib/LWP/Protocol/file.pm
new/libwww-perl-6.43/lib/LWP/Protocol/file.pm
--- old/libwww-perl-6.42/lib/LWP/Protocol/file.pm 2019-11-20
18:40:55.000000000 +0100
+++ new/libwww-perl-6.43/lib/LWP/Protocol/file.pm 2019-11-26
14:54:46.000000000 +0100
@@ -4,7 +4,7 @@
use strict;
-our $VERSION = '6.42';
+our $VERSION = '6.43';
require LWP::MediaTypes;
require HTTP::Request;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/libwww-perl-6.42/lib/LWP/Protocol/ftp.pm
new/libwww-perl-6.43/lib/LWP/Protocol/ftp.pm
--- old/libwww-perl-6.42/lib/LWP/Protocol/ftp.pm 2019-11-20
18:40:55.000000000 +0100
+++ new/libwww-perl-6.43/lib/LWP/Protocol/ftp.pm 2019-11-26
14:54:46.000000000 +0100
@@ -5,7 +5,7 @@
use base qw(LWP::Protocol);
use strict;
-our $VERSION = '6.42';
+our $VERSION = '6.43';
use Carp ();
use HTTP::Status ();
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/libwww-perl-6.42/lib/LWP/Protocol/gopher.pm
new/libwww-perl-6.43/lib/LWP/Protocol/gopher.pm
--- old/libwww-perl-6.42/lib/LWP/Protocol/gopher.pm 2019-11-20
18:40:55.000000000 +0100
+++ new/libwww-perl-6.43/lib/LWP/Protocol/gopher.pm 2019-11-26
14:54:46.000000000 +0100
@@ -9,7 +9,7 @@
use strict;
-our $VERSION = '6.42';
+our $VERSION = '6.43';
require HTTP::Response;
require HTTP::Status;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/libwww-perl-6.42/lib/LWP/Protocol/http.pm
new/libwww-perl-6.43/lib/LWP/Protocol/http.pm
--- old/libwww-perl-6.42/lib/LWP/Protocol/http.pm 2019-11-20
18:40:55.000000000 +0100
+++ new/libwww-perl-6.43/lib/LWP/Protocol/http.pm 2019-11-26
14:54:46.000000000 +0100
@@ -2,7 +2,7 @@
use strict;
-our $VERSION = '6.42';
+our $VERSION = '6.43';
require HTTP::Response;
require HTTP::Status;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/libwww-perl-6.42/lib/LWP/Protocol/loopback.pm
new/libwww-perl-6.43/lib/LWP/Protocol/loopback.pm
--- old/libwww-perl-6.42/lib/LWP/Protocol/loopback.pm 2019-11-20
18:40:55.000000000 +0100
+++ new/libwww-perl-6.43/lib/LWP/Protocol/loopback.pm 2019-11-26
14:54:46.000000000 +0100
@@ -2,7 +2,7 @@
use strict;
-our $VERSION = '6.42';
+our $VERSION = '6.43';
require HTTP::Response;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/libwww-perl-6.42/lib/LWP/Protocol/mailto.pm
new/libwww-perl-6.43/lib/LWP/Protocol/mailto.pm
--- old/libwww-perl-6.42/lib/LWP/Protocol/mailto.pm 2019-11-20
18:40:55.000000000 +0100
+++ new/libwww-perl-6.43/lib/LWP/Protocol/mailto.pm 2019-11-26
14:54:46.000000000 +0100
@@ -11,7 +11,7 @@
use Carp;
use strict;
-our $VERSION = '6.42';
+our $VERSION = '6.43';
use base qw(LWP::Protocol);
our $SENDMAIL;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/libwww-perl-6.42/lib/LWP/Protocol/nntp.pm
new/libwww-perl-6.43/lib/LWP/Protocol/nntp.pm
--- old/libwww-perl-6.42/lib/LWP/Protocol/nntp.pm 2019-11-20
18:40:55.000000000 +0100
+++ new/libwww-perl-6.43/lib/LWP/Protocol/nntp.pm 2019-11-26
14:54:46.000000000 +0100
@@ -4,7 +4,7 @@
use base qw(LWP::Protocol);
-our $VERSION = '6.42';
+our $VERSION = '6.43';
require HTTP::Response;
require HTTP::Status;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/libwww-perl-6.42/lib/LWP/Protocol/nogo.pm
new/libwww-perl-6.43/lib/LWP/Protocol/nogo.pm
--- old/libwww-perl-6.42/lib/LWP/Protocol/nogo.pm 2019-11-20
18:40:55.000000000 +0100
+++ new/libwww-perl-6.43/lib/LWP/Protocol/nogo.pm 2019-11-26
14:54:46.000000000 +0100
@@ -7,7 +7,7 @@
use strict;
-our $VERSION = '6.42';
+our $VERSION = '6.43';
require HTTP::Response;
require HTTP::Status;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/libwww-perl-6.42/lib/LWP/Protocol.pm
new/libwww-perl-6.43/lib/LWP/Protocol.pm
--- old/libwww-perl-6.42/lib/LWP/Protocol.pm 2019-11-20 18:40:55.000000000
+0100
+++ new/libwww-perl-6.43/lib/LWP/Protocol.pm 2019-11-26 14:54:46.000000000
+0100
@@ -2,7 +2,7 @@
use base 'LWP::MemberMixin';
-our $VERSION = '6.42';
+our $VERSION = '6.43';
use strict;
use Carp ();
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/libwww-perl-6.42/lib/LWP/RobotUA.pm
new/libwww-perl-6.43/lib/LWP/RobotUA.pm
--- old/libwww-perl-6.42/lib/LWP/RobotUA.pm 2019-11-20 18:40:55.000000000
+0100
+++ new/libwww-perl-6.43/lib/LWP/RobotUA.pm 2019-11-26 14:54:46.000000000
+0100
@@ -2,7 +2,7 @@
use base qw(LWP::UserAgent);
-our $VERSION = '6.42';
+our $VERSION = '6.43';
require WWW::RobotRules;
require HTTP::Request;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/libwww-perl-6.42/lib/LWP/Simple.pm
new/libwww-perl-6.43/lib/LWP/Simple.pm
--- old/libwww-perl-6.42/lib/LWP/Simple.pm 2019-11-20 18:40:55.000000000
+0100
+++ new/libwww-perl-6.43/lib/LWP/Simple.pm 2019-11-26 14:54:46.000000000
+0100
@@ -2,7 +2,7 @@
use strict;
-our $VERSION = '6.42';
+our $VERSION = '6.43';
require Exporter;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/libwww-perl-6.42/lib/LWP/UserAgent.pm
new/libwww-perl-6.43/lib/LWP/UserAgent.pm
--- old/libwww-perl-6.42/lib/LWP/UserAgent.pm 2019-11-20 18:40:55.000000000
+0100
+++ new/libwww-perl-6.43/lib/LWP/UserAgent.pm 2019-11-26 14:54:46.000000000
+0100
@@ -15,7 +15,7 @@
use Scalar::Util qw(blessed);
use Try::Tiny qw(try catch);
-our $VERSION = '6.42';
+our $VERSION = '6.43';
sub new
{
@@ -420,8 +420,11 @@
"Unsupported authentication scheme '$scheme'");
next CHALLENGE;
}
- return $class->authenticate($self, $proxy, $challenge, $response,
+ my $re = $class->authenticate($self, $proxy, $challenge, $response,
$request, $arg, $size);
+
+ next CHALLENGE if $re->code == HTTP::Status::RC_UNAUTHORIZED;
+ return $re;
}
return $response;
}
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/libwww-perl-6.42/lib/LWP.pm
new/libwww-perl-6.43/lib/LWP.pm
--- old/libwww-perl-6.42/lib/LWP.pm 2019-11-20 18:40:55.000000000 +0100
+++ new/libwww-perl-6.43/lib/LWP.pm 2019-11-26 14:54:46.000000000 +0100
@@ -1,6 +1,6 @@
package LWP;
-our $VERSION = '6.42';
+our $VERSION = '6.43';
require LWP::UserAgent; # this should load everything you need
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/libwww-perl-6.42/t/local/http.t
new/libwww-perl-6.43/t/local/http.t
--- old/libwww-perl-6.42/t/local/http.t 2019-11-20 18:40:55.000000000 +0100
+++ new/libwww-perl-6.43/t/local/http.t 2019-11-26 14:54:46.000000000 +0100
@@ -63,7 +63,7 @@
return plan skip_all => 'We could not talk to our daemon' unless $DAEMON;
return plan skip_all => 'No base URI' unless $base;
- plan tests => 106;
+ plan tests => 109;
my $ua = LWP::UserAgent->new;
$ua->agent("Mozilla/0.01 " . $ua->agent);
@@ -313,6 +313,13 @@
isa_ok($res, 'HTTP::Response', 'digestAuth: good response object');
is($res->code, 401, 'digestAuth: code 401');
}
+ { # basic and digest both allowed
+ my $req = HTTP::Request->new(GET => url("/multi_auth", $base));
+ my $res = MyUA3->new->request($req);
+ isa_ok($res, 'HTTP::Response', 'multiAuth: good response object');
+ ok($res->is_success, 'multiAuth: is_success with digestAuth');
+ is($res->header('X-Basic-Called'), 1, 'multiAuth: basicAuth was tried
first');
+ }
{ # proxy
$ua->proxy(ftp => $base);
my $req = HTTP::Request->new(GET => "ftp://ftp.perl.com/proxy";);
@@ -411,6 +418,14 @@
return undef;
}
}
+{
+ package MyUA3;
+ use base 'LWP::UserAgent';
+ sub get_basic_credentials {
+ my($self, $realm, $uri, $proxy) = @_;
+ return ("irrelevant", "xyzzy");
+ }
+}
sub daemonize {
my %router;
$router{delete_echo} = sub {
@@ -471,6 +486,42 @@
", qop=auth\015\012"
);
$c->send_crlf;
+ }
+ };
+ my $multi_auth_basic_was_called = 0;
+ $router{get_multi_auth} = sub {
+ my($c, $r) = @_;
+
+ my($u,$p) = $r->authorization_basic;
+ $multi_auth_basic_was_called = 1 if $u && $p;
+
+ my $auth = $r->authorization;
+ my %auth_params;
+ if ( defined($auth) && $auth =~ /^Digest\s+(.*)$/ ) {
+ %auth_params = map { split /=/ } split /,\s*/, $1;
+ }
+ if ( %auth_params &&
+ $auth_params{username} eq q{"irrelevant"} &&
+ $auth_params{realm} eq q{"libwww-perl-digest"}
+ ) {
+ # We don't care about the correctness of the headers here.
+ # The get_digest test already does that. This one is for
+ # asserting multiple different auth attempts.
+ $c->send_basic_header(200);
+ $c->print("X-Basic-Called: $multi_auth_basic_was_called\015\012");
+ $c->print("Content-Type: text/plain");
+ $c->send_crlf;
+ $c->send_crlf;
+ $c->print("ok\n");
+ }
+ else {
+ $c->send_basic_header(401);
+ $c->print("WWW-Authenticate: Basic realm=\"libwww-perl\"\015\012");
+ $c->print(
+ "WWW-Authenticate: Digest realm=\"libwww-perl-digest\",
nonce=\"12345\"",
+ ", qop=auth\015\012"
+ );
+ $c->send_crlf;
}
};
$router{get_echo} = sub {
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/libwww-perl-6.42/xt/author/pod-spell.t
new/libwww-perl-6.43/xt/author/pod-spell.t
--- old/libwww-perl-6.42/xt/author/pod-spell.t 2019-11-20 18:40:55.000000000
+0100
+++ new/libwww-perl-6.43/xt/author/pod-spell.t 2019-11-26 14:54:46.000000000
+0100
@@ -78,6 +78,7 @@
Fowler
Frank
Froehlich
+Galeev
Gavin
Gerhard
Gertjan
@@ -214,6 +215,7 @@
Robert
RobotUA
Rolf
+Roman
Romanov
Roszatycki
Sarathy
@@ -371,6 +373,7 @@
piotr
rg
ribasushi
+roman
ruff
sasao
sburke
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/libwww-perl-6.42/xt/release/changes_has_content.t
new/libwww-perl-6.43/xt/release/changes_has_content.t
--- old/libwww-perl-6.42/xt/release/changes_has_content.t 2019-11-20
18:40:55.000000000 +0100
+++ new/libwww-perl-6.43/xt/release/changes_has_content.t 2019-11-26
14:54:46.000000000 +0100
@@ -8,7 +8,7 @@
note 'Checking Changes';
my $changes_file = 'Changes';
-my $newver = '6.42';
+my $newver = '6.43';
my $trial_token = '-TRIAL';
my $encoding = 'UTF-8';
