Hello community, here is the log from the commit of package perl-libwww-perl for openSUSE:Factory checked in at 2020-09-01 20:01:19 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Comparing /work/SRC/openSUSE:Factory/perl-libwww-perl (Old) and /work/SRC/openSUSE:Factory/.perl-libwww-perl.new.3399 (New) ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Package is "perl-libwww-perl" Tue Sep 1 20:01:19 2020 rev:68 rq:828478 version:6.47 Changes: -------- --- /work/SRC/openSUSE:Factory/perl-libwww-perl/perl-libwww-perl.changes 2020-06-28 23:07:37.203116467 +0200 +++ /work/SRC/openSUSE:Factory/.perl-libwww-perl.new.3399/perl-libwww-perl.changes 2020-09-01 20:01:21.672423848 +0200 @@ -1,0 +2,10 @@ +Wed Aug 19 03:17:12 UTC 2020 - Tina Müller <timueller+perl@suse.de> + +- updated to 6.47 + see /usr/share/doc/packages/perl-libwww-perl/Changes + + 6.47 2020-08-18 15:27:27Z + - Only add cookies from the jar if there aren't cookies in the request + (GH#347) (Doug Bell and Olaf Alders) + +------------------------------------------------------------------- Old: ---- libwww-perl-6.46.tar.gz New: ---- libwww-perl-6.47.tar.gz ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Other differences: ------------------ ++++++ perl-libwww-perl.spec ++++++ --- /var/tmp/diff_new_pack.BE3f1G/_old 2020-09-01 20:01:23.124424527 +0200 +++ /var/tmp/diff_new_pack.BE3f1G/_new 2020-09-01 20:01:23.132424531 +0200 @@ -17,7 +17,7 @@ Name: perl-libwww-perl -Version: 6.46 +Version: 6.47 Release: 0 %define cpan_name libwww-perl Summary: The World-Wide Web library for Perl ++++++ libwww-perl-6.46.tar.gz -> libwww-perl-6.47.tar.gz ++++++ diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/libwww-perl-6.46/Changes new/libwww-perl-6.47/Changes --- old/libwww-perl-6.46/Changes 2020-06-23 23:19:31.000000000 +0200 +++ new/libwww-perl-6.47/Changes 2020-08-18 17:27:32.000000000 +0200 @@ -1,5 +1,9 @@ Change history for libwww-perl +6.47 2020-08-18 15:27:27Z + - Only add cookies from the jar if there aren't cookies in the request + (GH#347) (Doug Bell and Olaf Alders) + 6.46 2020-06-23 21:19:26Z - Fix a looping regression in 6.45 for redirect responses without a Location header (GH PR#342, Niko Tyni) diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/libwww-perl-6.46/META.json new/libwww-perl-6.47/META.json --- old/libwww-perl-6.46/META.json 2020-06-23 23:19:31.000000000 +0200 +++ new/libwww-perl-6.47/META.json 2020-08-18 17:27:32.000000000 +0200 @@ -109,96 +109,96 @@ "provides" : { "LWP" : { "file" : "lib/LWP.pm", - "version" : "6.46" + "version" : "6.47" }, "LWP::Authen::Basic" : { "file" : "lib/LWP/Authen/Basic.pm", - "version" : "6.46" + "version" : "6.47" }, "LWP::Authen::Digest" : { "file" : "lib/LWP/Authen/Digest.pm", - "version" : "6.46" + "version" : "6.47" }, "LWP::Authen::Ntlm" : { "file" : "lib/LWP/Authen/Ntlm.pm", - "version" : "6.46" + "version" : "6.47" }, "LWP::ConnCache" : { "file" : "lib/LWP/ConnCache.pm", - "version" : "6.46" + "version" : "6.47" }, "LWP::Debug" : { "file" : "lib/LWP/Debug.pm", - "version" : "6.46", + "version" : "6.47", "x_deprecated" : 1 }, "LWP::Debug::TraceHTTP" : { "file" : "lib/LWP/Debug/TraceHTTP.pm", - "version" : "6.46" + "version" : "6.47" }, "LWP::DebugFile" : { "file" : "lib/LWP/DebugFile.pm", - "version" : "6.46" + "version" : "6.47" }, "LWP::MemberMixin" : { "file" : "lib/LWP/MemberMixin.pm", - "version" : "6.46" + "version" : "6.47" }, "LWP::Protocol" : { "file" : "lib/LWP/Protocol.pm", - "version" : "6.46" + "version" : "6.47" }, "LWP::Protocol::cpan" : { "file" : "lib/LWP/Protocol/cpan.pm", - "version" : "6.46" + "version" : "6.47" }, "LWP::Protocol::data" : { "file" : "lib/LWP/Protocol/data.pm", - "version" : "6.46" + "version" : "6.47" }, "LWP::Protocol::file" : { "file" : "lib/LWP/Protocol/file.pm", - "version" : "6.46" + "version" : "6.47" }, "LWP::Protocol::ftp" : { "file" : "lib/LWP/Protocol/ftp.pm", - "version" : "6.46" + "version" : "6.47" }, "LWP::Protocol::gopher" : { "file" : "lib/LWP/Protocol/gopher.pm", - "version" : "6.46" + "version" : "6.47" }, "LWP::Protocol::http" : { "file" : "lib/LWP/Protocol/http.pm", - "version" : "6.46" + "version" : "6.47" }, "LWP::Protocol::loopback" : { "file" : "lib/LWP/Protocol/loopback.pm", - "version" : "6.46" + "version" : "6.47" }, "LWP::Protocol::mailto" : { "file" : "lib/LWP/Protocol/mailto.pm", - "version" : "6.46" + "version" : "6.47" }, "LWP::Protocol::nntp" : { "file" : "lib/LWP/Protocol/nntp.pm", - "version" : "6.46" + "version" : "6.47" }, "LWP::Protocol::nogo" : { "file" : "lib/LWP/Protocol/nogo.pm", - "version" : "6.46" + "version" : "6.47" }, "LWP::RobotUA" : { "file" : "lib/LWP/RobotUA.pm", - "version" : "6.46" + "version" : "6.47" }, "LWP::Simple" : { "file" : "lib/LWP/Simple.pm", - "version" : "6.46" + "version" : "6.47" }, "LWP::UserAgent" : { "file" : "lib/LWP/UserAgent.pm", - "version" : "6.46" + "version" : "6.47" } }, "release_status" : "stable", @@ -215,10 +215,10 @@ "x_IRC" : "irc://irc.perl.org/#lwp", "x_MailingList" : "mailto:libwww@perl.org" }, - "version" : "6.46", + "version" : "6.47", "x_Dist_Zilla" : { "perl" : { - "version" : "5.030002" + "version" : "5.026001" }, "plugins" : [ { @@ -269,8 +269,8 @@ "meta_noindex" : 1 }, "Dist::Zilla::Role::ModuleMetadata" : { - "Module::Metadata" : "1.000036", - "version" : "0.006" + "Module::Metadata" : "1.000037", + "version" : "0.004" } }, "name" : "MetaProvides::Package", @@ -313,7 +313,7 @@ "class" : "Dist::Zilla::Plugin::Git::Contributors", "config" : { "Dist::Zilla::Plugin::Git::Contributors" : { - "git_version" : "2.26.2", + "git_version" : "2.28.0", "include_authors" : 0, "include_releaser" : 1, "order_by" : "name", @@ -347,8 +347,8 @@ "class" : "Dist::Zilla::Plugin::InstallGuide", "config" : { "Dist::Zilla::Role::ModuleMetadata" : { - "Module::Metadata" : "1.000036", - "version" : "0.006" + "Module::Metadata" : "1.000037", + "version" : "0.004" } }, "name" : "InstallGuide", @@ -368,8 +368,8 @@ "class" : "Dist::Zilla::Plugin::DynamicPrereqs", "config" : { "Dist::Zilla::Role::ModuleMetadata" : { - "Module::Metadata" : "1.000036", - "version" : "0.006" + "Module::Metadata" : "1.000037", + "version" : "0.004" } }, "name" : "DynamicPrereqs", @@ -633,7 +633,7 @@ "changelog" : "Changes" }, "Dist::Zilla::Role::Git::Repo" : { - "git_version" : "2.26.2", + "git_version" : "2.28.0", "repo_root" : "." } }, @@ -763,7 +763,7 @@ "changelog" : "Changes" }, "Dist::Zilla::Role::Git::Repo" : { - "git_version" : "2.26.2", + "git_version" : "2.28.0", "repo_root" : "." }, "Dist::Zilla::Role::Git::StringFormatter" : { @@ -780,12 +780,12 @@ "branch" : null, "changelog" : "Changes", "signed" : 0, - "tag" : "v6.46", + "tag" : "v6.47", "tag_format" : "v%V", "tag_message" : "v%V" }, "Dist::Zilla::Role::Git::Repo" : { - "git_version" : "2.26.2", + "git_version" : "2.28.0", "repo_root" : "." }, "Dist::Zilla::Role::Git::StringFormatter" : { @@ -835,7 +835,7 @@ "changelog" : "Changes" }, "Dist::Zilla::Role::Git::Repo" : { - "git_version" : "2.26.2", + "git_version" : "2.28.0", "repo_root" : "." }, "Dist::Zilla::Role::Git::StringFormatter" : { @@ -855,7 +855,7 @@ "remotes_must_exist" : 1 }, "Dist::Zilla::Role::Git::Repo" : { - "git_version" : "2.26.2", + "git_version" : "2.28.0", "repo_root" : "." } }, @@ -1033,8 +1033,8 @@ "Yury Zavarin <yury.zavarin@gmail.com>", "Zefram <zefram@fysh.org>" ], - "x_generated_by_perl" : "v5.30.2", - "x_serialization_backend" : "Cpanel::JSON::XS version 4.19", + "x_generated_by_perl" : "v5.26.1", + "x_serialization_backend" : "Cpanel::JSON::XS version 4.04", "x_spdx_expression" : "Artistic-1.0-Perl OR GPL-1.0-or-later" } diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/libwww-perl-6.46/META.yml new/libwww-perl-6.47/META.yml --- old/libwww-perl-6.46/META.yml 2020-06-23 23:19:31.000000000 +0200 +++ new/libwww-perl-6.47/META.yml 2020-08-18 17:27:32.000000000 +0200 @@ -30,74 +30,74 @@ provides: LWP: file: lib/LWP.pm - version: '6.46' + version: '6.47' LWP::Authen::Basic: file: lib/LWP/Authen/Basic.pm - version: '6.46' + version: '6.47' LWP::Authen::Digest: file: lib/LWP/Authen/Digest.pm - version: '6.46' + version: '6.47' LWP::Authen::Ntlm: file: lib/LWP/Authen/Ntlm.pm - version: '6.46' + version: '6.47' LWP::ConnCache: file: lib/LWP/ConnCache.pm - version: '6.46' + version: '6.47' LWP::Debug: file: lib/LWP/Debug.pm - version: '6.46' + version: '6.47' x_deprecated: 1 LWP::Debug::TraceHTTP: file: lib/LWP/Debug/TraceHTTP.pm - version: '6.46' + version: '6.47' LWP::DebugFile: file: lib/LWP/DebugFile.pm - version: '6.46' + version: '6.47' LWP::MemberMixin: file: lib/LWP/MemberMixin.pm - version: '6.46' + version: '6.47' LWP::Protocol: file: lib/LWP/Protocol.pm - version: '6.46' + version: '6.47' LWP::Protocol::cpan: file: lib/LWP/Protocol/cpan.pm - version: '6.46' + version: '6.47' LWP::Protocol::data: file: lib/LWP/Protocol/data.pm - version: '6.46' + version: '6.47' LWP::Protocol::file: file: lib/LWP/Protocol/file.pm - version: '6.46' + version: '6.47' LWP::Protocol::ftp: file: lib/LWP/Protocol/ftp.pm - version: '6.46' + version: '6.47' LWP::Protocol::gopher: file: lib/LWP/Protocol/gopher.pm - version: '6.46' + version: '6.47' LWP::Protocol::http: file: lib/LWP/Protocol/http.pm - version: '6.46' + version: '6.47' LWP::Protocol::loopback: file: lib/LWP/Protocol/loopback.pm - version: '6.46' + version: '6.47' LWP::Protocol::mailto: file: lib/LWP/Protocol/mailto.pm - version: '6.46' + version: '6.47' LWP::Protocol::nntp: file: lib/LWP/Protocol/nntp.pm - version: '6.46' + version: '6.47' LWP::Protocol::nogo: file: lib/LWP/Protocol/nogo.pm - version: '6.46' + version: '6.47' LWP::RobotUA: file: lib/LWP/RobotUA.pm - version: '6.46' + version: '6.47' LWP::Simple: file: lib/LWP/Simple.pm - version: '6.46' + version: '6.47' LWP::UserAgent: file: lib/LWP/UserAgent.pm - version: '6.46' + version: '6.47' requires: Digest::MD5: '0' Encode: '2.12' @@ -134,10 +134,10 @@ 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.46' +version: '6.47' x_Dist_Zilla: perl: - version: '5.030002' + version: '5.026001' plugins: - class: Dist::Zilla::Plugin::Git::GatherDir @@ -177,8 +177,8 @@ inherit_version: '1' meta_noindex: '1' Dist::Zilla::Role::ModuleMetadata: - Module::Metadata: '1.000036' - version: '0.006' + Module::Metadata: '1.000037' + version: '0.004' name: MetaProvides::Package version: '2.004003' - @@ -210,7 +210,7 @@ class: Dist::Zilla::Plugin::Git::Contributors config: Dist::Zilla::Plugin::Git::Contributors: - git_version: 2.26.2 + git_version: 2.28.0 include_authors: 0 include_releaser: 1 order_by: name @@ -237,8 +237,8 @@ class: Dist::Zilla::Plugin::InstallGuide config: Dist::Zilla::Role::ModuleMetadata: - Module::Metadata: '1.000036' - version: '0.006' + Module::Metadata: '1.000037' + version: '0.004' name: InstallGuide version: '1.200013' - @@ -253,8 +253,8 @@ class: Dist::Zilla::Plugin::DynamicPrereqs config: Dist::Zilla::Role::ModuleMetadata: - Module::Metadata: '1.000036' - version: '0.006' + Module::Metadata: '1.000037' + version: '0.004' name: DynamicPrereqs version: '0.037' - @@ -481,7 +481,7 @@ allow_dirty_match: [] changelog: Changes Dist::Zilla::Role::Git::Repo: - git_version: 2.26.2 + git_version: 2.28.0 repo_root: . name: Git::Check version: '2.046' @@ -578,7 +578,7 @@ allow_dirty_match: [] changelog: Changes Dist::Zilla::Role::Git::Repo: - git_version: 2.26.2 + git_version: 2.28.0 repo_root: . Dist::Zilla::Role::Git::StringFormatter: time_zone: local @@ -591,11 +591,11 @@ branch: ~ changelog: Changes signed: 0 - tag: v6.46 + tag: v6.47 tag_format: v%V tag_message: v%V Dist::Zilla::Role::Git::Repo: - git_version: 2.26.2 + git_version: 2.28.0 repo_root: . Dist::Zilla::Role::Git::StringFormatter: time_zone: local @@ -632,7 +632,7 @@ - (?^:^lib/.*\.pm$) changelog: Changes Dist::Zilla::Role::Git::Repo: - git_version: 2.26.2 + git_version: 2.28.0 repo_root: . Dist::Zilla::Role::Git::StringFormatter: time_zone: local @@ -646,7 +646,7 @@ - origin remotes_must_exist: 1 Dist::Zilla::Role::Git::Repo: - git_version: 2.26.2 + git_version: 2.28.0 repo_root: . name: Git::Push version: '2.046' @@ -804,6 +804,6 @@ - 'Yuri Karaban <tech@askold.net>' - 'Yury Zavarin <yury.zavarin@gmail.com>' - 'Zefram <zefram@fysh.org>' -x_generated_by_perl: v5.30.2 -x_serialization_backend: 'YAML::Tiny version 1.73' +x_generated_by_perl: v5.26.1 +x_serialization_backend: 'YAML::Tiny version 1.70' x_spdx_expression: 'Artistic-1.0-Perl OR GPL-1.0-or-later' diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/libwww-perl-6.46/Makefile.PL new/libwww-perl-6.47/Makefile.PL --- old/libwww-perl-6.46/Makefile.PL 2020-06-23 23:19:31.000000000 +0200 +++ new/libwww-perl-6.47/Makefile.PL 2020-08-18 17:27:32.000000000 +0200 @@ -86,7 +86,7 @@ "Test::Needs" => 0, "Test::RequiresInternet" => 0 }, - "VERSION" => "6.46", + "VERSION" => "6.47", "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.46/lib/LWP/Authen/Basic.pm new/libwww-perl-6.47/lib/LWP/Authen/Basic.pm --- old/libwww-perl-6.46/lib/LWP/Authen/Basic.pm 2020-06-23 23:19:31.000000000 +0200 +++ new/libwww-perl-6.47/lib/LWP/Authen/Basic.pm 2020-08-18 17:27:32.000000000 +0200 @@ -2,7 +2,7 @@ use strict; -our $VERSION = '6.46'; +our $VERSION = '6.47'; require Encode; require MIME::Base64; diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/libwww-perl-6.46/lib/LWP/Authen/Digest.pm new/libwww-perl-6.47/lib/LWP/Authen/Digest.pm --- old/libwww-perl-6.46/lib/LWP/Authen/Digest.pm 2020-06-23 23:19:31.000000000 +0200 +++ new/libwww-perl-6.47/lib/LWP/Authen/Digest.pm 2020-08-18 17:27:32.000000000 +0200 @@ -3,7 +3,7 @@ use strict; use base 'LWP::Authen::Basic'; -our $VERSION = '6.46'; +our $VERSION = '6.47'; require Digest::MD5; diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/libwww-perl-6.46/lib/LWP/Authen/Ntlm.pm new/libwww-perl-6.47/lib/LWP/Authen/Ntlm.pm --- old/libwww-perl-6.46/lib/LWP/Authen/Ntlm.pm 2020-06-23 23:19:31.000000000 +0200 +++ new/libwww-perl-6.47/lib/LWP/Authen/Ntlm.pm 2020-08-18 17:27:32.000000000 +0200 @@ -2,7 +2,7 @@ use strict; -our $VERSION = '6.46'; +our $VERSION = '6.47'; use Authen::NTLM "1.02"; use MIME::Base64 "2.12"; diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/libwww-perl-6.46/lib/LWP/ConnCache.pm new/libwww-perl-6.47/lib/LWP/ConnCache.pm --- old/libwww-perl-6.46/lib/LWP/ConnCache.pm 2020-06-23 23:19:31.000000000 +0200 +++ new/libwww-perl-6.47/lib/LWP/ConnCache.pm 2020-08-18 17:27:32.000000000 +0200 @@ -2,7 +2,7 @@ use strict; -our $VERSION = '6.46'; +our $VERSION = '6.47'; our $DEBUG; sub new { diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/libwww-perl-6.46/lib/LWP/Debug/TraceHTTP.pm new/libwww-perl-6.47/lib/LWP/Debug/TraceHTTP.pm --- old/libwww-perl-6.46/lib/LWP/Debug/TraceHTTP.pm 2020-06-23 23:19:31.000000000 +0200 +++ new/libwww-perl-6.47/lib/LWP/Debug/TraceHTTP.pm 2020-08-18 17:27:32.000000000 +0200 @@ -11,7 +11,7 @@ use strict; use base 'LWP::Protocol::http'; -our $VERSION = '6.46'; +our $VERSION = '6.47'; package # hide from PAUSE LWP::Debug::TraceHTTP::Socket; diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/libwww-perl-6.46/lib/LWP/Debug.pm new/libwww-perl-6.47/lib/LWP/Debug.pm --- old/libwww-perl-6.46/lib/LWP/Debug.pm 2020-06-23 23:19:31.000000000 +0200 +++ new/libwww-perl-6.47/lib/LWP/Debug.pm 2020-08-18 17:27:32.000000000 +0200 @@ -1,6 +1,6 @@ package LWP::Debug; # legacy -our $VERSION = '6.46'; +our $VERSION = '6.47'; require Exporter; our @ISA = qw(Exporter); diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/libwww-perl-6.46/lib/LWP/DebugFile.pm new/libwww-perl-6.47/lib/LWP/DebugFile.pm --- old/libwww-perl-6.46/lib/LWP/DebugFile.pm 2020-06-23 23:19:31.000000000 +0200 +++ new/libwww-perl-6.47/lib/LWP/DebugFile.pm 2020-08-18 17:27:32.000000000 +0200 @@ -1,6 +1,6 @@ package LWP::DebugFile; -our $VERSION = '6.46'; +our $VERSION = '6.47'; # legacy stub diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/libwww-perl-6.46/lib/LWP/MemberMixin.pm new/libwww-perl-6.47/lib/LWP/MemberMixin.pm --- old/libwww-perl-6.46/lib/LWP/MemberMixin.pm 2020-06-23 23:19:31.000000000 +0200 +++ new/libwww-perl-6.47/lib/LWP/MemberMixin.pm 2020-08-18 17:27:32.000000000 +0200 @@ -1,6 +1,6 @@ package LWP::MemberMixin; -our $VERSION = '6.46'; +our $VERSION = '6.47'; sub _elem { my $self = shift; diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/libwww-perl-6.46/lib/LWP/Protocol/cpan.pm new/libwww-perl-6.47/lib/LWP/Protocol/cpan.pm --- old/libwww-perl-6.46/lib/LWP/Protocol/cpan.pm 2020-06-23 23:19:31.000000000 +0200 +++ new/libwww-perl-6.47/lib/LWP/Protocol/cpan.pm 2020-08-18 17:27:32.000000000 +0200 @@ -4,7 +4,7 @@ use base qw(LWP::Protocol); -our $VERSION = '6.46'; +our $VERSION = '6.47'; require URI; require HTTP::Status; diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/libwww-perl-6.46/lib/LWP/Protocol/data.pm new/libwww-perl-6.47/lib/LWP/Protocol/data.pm --- old/libwww-perl-6.46/lib/LWP/Protocol/data.pm 2020-06-23 23:19:31.000000000 +0200 +++ new/libwww-perl-6.47/lib/LWP/Protocol/data.pm 2020-08-18 17:27:32.000000000 +0200 @@ -4,7 +4,7 @@ use strict; -our $VERSION = '6.46'; +our $VERSION = '6.47'; require HTTP::Response; require HTTP::Status; diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/libwww-perl-6.46/lib/LWP/Protocol/file.pm new/libwww-perl-6.47/lib/LWP/Protocol/file.pm --- old/libwww-perl-6.46/lib/LWP/Protocol/file.pm 2020-06-23 23:19:31.000000000 +0200 +++ new/libwww-perl-6.47/lib/LWP/Protocol/file.pm 2020-08-18 17:27:32.000000000 +0200 @@ -4,7 +4,7 @@ use strict; -our $VERSION = '6.46'; +our $VERSION = '6.47'; require LWP::MediaTypes; require HTTP::Request; diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/libwww-perl-6.46/lib/LWP/Protocol/ftp.pm new/libwww-perl-6.47/lib/LWP/Protocol/ftp.pm --- old/libwww-perl-6.46/lib/LWP/Protocol/ftp.pm 2020-06-23 23:19:31.000000000 +0200 +++ new/libwww-perl-6.47/lib/LWP/Protocol/ftp.pm 2020-08-18 17:27:32.000000000 +0200 @@ -5,7 +5,7 @@ use base qw(LWP::Protocol); use strict; -our $VERSION = '6.46'; +our $VERSION = '6.47'; use Carp (); use HTTP::Status (); diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/libwww-perl-6.46/lib/LWP/Protocol/gopher.pm new/libwww-perl-6.47/lib/LWP/Protocol/gopher.pm --- old/libwww-perl-6.46/lib/LWP/Protocol/gopher.pm 2020-06-23 23:19:31.000000000 +0200 +++ new/libwww-perl-6.47/lib/LWP/Protocol/gopher.pm 2020-08-18 17:27:32.000000000 +0200 @@ -9,7 +9,7 @@ use strict; -our $VERSION = '6.46'; +our $VERSION = '6.47'; require HTTP::Response; require HTTP::Status; diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/libwww-perl-6.46/lib/LWP/Protocol/http.pm new/libwww-perl-6.47/lib/LWP/Protocol/http.pm --- old/libwww-perl-6.46/lib/LWP/Protocol/http.pm 2020-06-23 23:19:31.000000000 +0200 +++ new/libwww-perl-6.47/lib/LWP/Protocol/http.pm 2020-08-18 17:27:32.000000000 +0200 @@ -2,7 +2,7 @@ use strict; -our $VERSION = '6.46'; +our $VERSION = '6.47'; require HTTP::Response; require HTTP::Status; diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/libwww-perl-6.46/lib/LWP/Protocol/loopback.pm new/libwww-perl-6.47/lib/LWP/Protocol/loopback.pm --- old/libwww-perl-6.46/lib/LWP/Protocol/loopback.pm 2020-06-23 23:19:31.000000000 +0200 +++ new/libwww-perl-6.47/lib/LWP/Protocol/loopback.pm 2020-08-18 17:27:32.000000000 +0200 @@ -2,7 +2,7 @@ use strict; -our $VERSION = '6.46'; +our $VERSION = '6.47'; require HTTP::Response; diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/libwww-perl-6.46/lib/LWP/Protocol/mailto.pm new/libwww-perl-6.47/lib/LWP/Protocol/mailto.pm --- old/libwww-perl-6.46/lib/LWP/Protocol/mailto.pm 2020-06-23 23:19:31.000000000 +0200 +++ new/libwww-perl-6.47/lib/LWP/Protocol/mailto.pm 2020-08-18 17:27:32.000000000 +0200 @@ -11,7 +11,7 @@ use Carp; use strict; -our $VERSION = '6.46'; +our $VERSION = '6.47'; use base qw(LWP::Protocol); our $SENDMAIL; diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/libwww-perl-6.46/lib/LWP/Protocol/nntp.pm new/libwww-perl-6.47/lib/LWP/Protocol/nntp.pm --- old/libwww-perl-6.46/lib/LWP/Protocol/nntp.pm 2020-06-23 23:19:31.000000000 +0200 +++ new/libwww-perl-6.47/lib/LWP/Protocol/nntp.pm 2020-08-18 17:27:32.000000000 +0200 @@ -4,7 +4,7 @@ use base qw(LWP::Protocol); -our $VERSION = '6.46'; +our $VERSION = '6.47'; require HTTP::Response; require HTTP::Status; diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/libwww-perl-6.46/lib/LWP/Protocol/nogo.pm new/libwww-perl-6.47/lib/LWP/Protocol/nogo.pm --- old/libwww-perl-6.46/lib/LWP/Protocol/nogo.pm 2020-06-23 23:19:31.000000000 +0200 +++ new/libwww-perl-6.47/lib/LWP/Protocol/nogo.pm 2020-08-18 17:27:32.000000000 +0200 @@ -7,7 +7,7 @@ use strict; -our $VERSION = '6.46'; +our $VERSION = '6.47'; require HTTP::Response; require HTTP::Status; diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/libwww-perl-6.46/lib/LWP/Protocol.pm new/libwww-perl-6.47/lib/LWP/Protocol.pm --- old/libwww-perl-6.46/lib/LWP/Protocol.pm 2020-06-23 23:19:31.000000000 +0200 +++ new/libwww-perl-6.47/lib/LWP/Protocol.pm 2020-08-18 17:27:32.000000000 +0200 @@ -2,7 +2,7 @@ use base 'LWP::MemberMixin'; -our $VERSION = '6.46'; +our $VERSION = '6.47'; use strict; use Carp (); diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/libwww-perl-6.46/lib/LWP/RobotUA.pm new/libwww-perl-6.47/lib/LWP/RobotUA.pm --- old/libwww-perl-6.46/lib/LWP/RobotUA.pm 2020-06-23 23:19:31.000000000 +0200 +++ new/libwww-perl-6.47/lib/LWP/RobotUA.pm 2020-08-18 17:27:32.000000000 +0200 @@ -2,7 +2,7 @@ use base qw(LWP::UserAgent); -our $VERSION = '6.46'; +our $VERSION = '6.47'; require WWW::RobotRules; require HTTP::Request; diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/libwww-perl-6.46/lib/LWP/Simple.pm new/libwww-perl-6.47/lib/LWP/Simple.pm --- old/libwww-perl-6.46/lib/LWP/Simple.pm 2020-06-23 23:19:31.000000000 +0200 +++ new/libwww-perl-6.47/lib/LWP/Simple.pm 2020-08-18 17:27:32.000000000 +0200 @@ -2,7 +2,7 @@ use strict; -our $VERSION = '6.46'; +our $VERSION = '6.47'; require Exporter; diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/libwww-perl-6.46/lib/LWP/UserAgent.pm new/libwww-perl-6.47/lib/LWP/UserAgent.pm --- old/libwww-perl-6.46/lib/LWP/UserAgent.pm 2020-06-23 23:19:31.000000000 +0200 +++ new/libwww-perl-6.47/lib/LWP/UserAgent.pm 2020-08-18 17:27:32.000000000 +0200 @@ -15,7 +15,7 @@ use Scalar::Util qw(blessed); use Try::Tiny qw(try catch); -our $VERSION = '6.46'; +our $VERSION = '6.47'; sub new { @@ -783,7 +783,10 @@ } $self->{cookie_jar} = $jar; $self->set_my_handler("request_prepare", - $jar ? sub { $jar->add_cookie_header($_[0]); } : undef, + $jar ? sub { + return if $_[0]->header("Cookie"); + $jar->add_cookie_header($_[0]); + } : undef, ); $self->set_my_handler("response_done", $jar ? sub { $jar->extract_cookies($_[0]); } : undef, diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/libwww-perl-6.46/lib/LWP.pm new/libwww-perl-6.47/lib/LWP.pm --- old/libwww-perl-6.46/lib/LWP.pm 2020-06-23 23:19:31.000000000 +0200 +++ new/libwww-perl-6.47/lib/LWP.pm 2020-08-18 17:27:32.000000000 +0200 @@ -1,6 +1,6 @@ package LWP; -our $VERSION = '6.46'; +our $VERSION = '6.47'; require LWP::UserAgent; # this should load everything you need diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/libwww-perl-6.46/t/local/http.t new/libwww-perl-6.47/t/local/http.t --- old/libwww-perl-6.46/t/local/http.t 2020-06-23 23:19:31.000000000 +0200 +++ new/libwww-perl-6.47/t/local/http.t 2020-08-18 17:27:32.000000000 +0200 @@ -5,6 +5,7 @@ use Config; use FindBin qw($Bin); +use HTTP::Cookies (); use HTTP::Daemon; use HTTP::Request; use IO::Socket; @@ -63,7 +64,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 => 127; + plan tests => 130; my $ua = LWP::UserAgent->new; $ua->agent("Mozilla/0.01 " . $ua->agent); @@ -414,6 +415,20 @@ $ua->max_size(undef); like($res->as_string, qr/Client-Aborted: max_size/, 'partial: aborted'); # Client-Aborted is returned when max_size is given } + { + my $jar = HTTP::Cookies->new; + $jar->set_cookie( 1.1, "who", "cookie_man", "/", $base->host ); + $ua->cookie_jar($jar); + my $req = HTTP::Request->new( GET => url("/echo", $base) ); + my $res = $ua->request( $req ); + # Must have cookie + ok($res->is_success); + ok($res->decoded_content =~ /Cookie:[^\n]+who\s*=\s*cookie_man/, "request had cookie header" ) + or diag( $res->decoded_content ); + $res = $ua->request( $req ); + # Must have only one cookie + is( scalar( () = $res->decoded_content =~ /who\s*=\s*cookie_man/g ), 1, "request had only one cookie header" ) + } { # terminate server my $req = HTTP::Request->new(GET => url("/quit", $base)); my $res = $ua->request($req); diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/libwww-perl-6.46/xt/release/changes_has_content.t new/libwww-perl-6.47/xt/release/changes_has_content.t --- old/libwww-perl-6.46/xt/release/changes_has_content.t 2020-06-23 23:19:31.000000000 +0200 +++ new/libwww-perl-6.47/xt/release/changes_has_content.t 2020-08-18 17:27:32.000000000 +0200 @@ -8,7 +8,7 @@ note 'Checking Changes'; my $changes_file = 'Changes'; -my $newver = '6.46'; +my $newver = '6.47'; my $trial_token = '-TRIAL'; my $encoding = 'UTF-8';