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 <[email protected]>
+
+- 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:[email protected]";
    },
-   "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 <[email protected]>",
       "Zefram <[email protected]>"
    ],
-   "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 <[email protected]>'
   - 'Yury Zavarin <[email protected]>'
   - 'Zefram <[email protected]>'
-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';
 


Reply via email to