Imported Upstream version 6.52 upstream/6.52
authorDongHun Kwak <dh0128.kwak@samsung.com>
Thu, 21 Jul 2022 02:28:26 +0000 (11:28 +0900)
committerDongHun Kwak <dh0128.kwak@samsung.com>
Thu, 21 Jul 2022 02:28:26 +0000 (11:28 +0900)
28 files changed:
Changes
META.json
META.yml
Makefile.PL
lib/LWP.pm
lib/LWP/Authen/Basic.pm
lib/LWP/Authen/Digest.pm
lib/LWP/Authen/Ntlm.pm
lib/LWP/ConnCache.pm
lib/LWP/Debug.pm
lib/LWP/Debug/TraceHTTP.pm
lib/LWP/DebugFile.pm
lib/LWP/MemberMixin.pm
lib/LWP/Protocol.pm
lib/LWP/Protocol/cpan.pm
lib/LWP/Protocol/data.pm
lib/LWP/Protocol/file.pm
lib/LWP/Protocol/ftp.pm
lib/LWP/Protocol/gopher.pm
lib/LWP/Protocol/http.pm
lib/LWP/Protocol/loopback.pm
lib/LWP/Protocol/mailto.pm
lib/LWP/Protocol/nntp.pm
lib/LWP/Protocol/nogo.pm
lib/LWP/RobotUA.pm
lib/LWP/Simple.pm
lib/LWP/UserAgent.pm
xt/release/changes_has_content.t

diff --git a/Changes b/Changes
index 5f236a77fee3c5b9bcd2ff74443cbde49a8aa257..85a590b6de6da7a31a8cbbe38a1ac88df8f5f1c9 100644 (file)
--- a/Changes
+++ b/Changes
@@ -1,5 +1,9 @@
 Change history for libwww-perl
 
+6.52      2021-01-07 21:20:51Z
+    - Remove block of code which creates message-digest auth request field
+      (GH#369) (Olaf Alders)
+
 6.51      2020-12-29 22:09:04Z
     - Fix proxy test on Windows (GH#358) (Olaf Alders)
     - Sort keys in Pod example of constructor defaults (GH#356) (Olaf Alders)
index 5ffbe7ab2550c2b82e08f02558c8e76dd2f0cd4b..c76a878ddb12066d0720d897390606007a92e2e9 100644 (file)
--- a/META.json
+++ b/META.json
    "provides" : {
       "LWP" : {
          "file" : "lib/LWP.pm",
-         "version" : "6.51"
+         "version" : "6.52"
       },
       "LWP::Authen::Basic" : {
          "file" : "lib/LWP/Authen/Basic.pm",
-         "version" : "6.51"
+         "version" : "6.52"
       },
       "LWP::Authen::Digest" : {
          "file" : "lib/LWP/Authen/Digest.pm",
-         "version" : "6.51"
+         "version" : "6.52"
       },
       "LWP::Authen::Ntlm" : {
          "file" : "lib/LWP/Authen/Ntlm.pm",
-         "version" : "6.51"
+         "version" : "6.52"
       },
       "LWP::ConnCache" : {
          "file" : "lib/LWP/ConnCache.pm",
-         "version" : "6.51"
+         "version" : "6.52"
       },
       "LWP::Debug" : {
          "file" : "lib/LWP/Debug.pm",
-         "version" : "6.51",
+         "version" : "6.52",
          "x_deprecated" : 1
       },
       "LWP::Debug::TraceHTTP" : {
          "file" : "lib/LWP/Debug/TraceHTTP.pm",
-         "version" : "6.51"
+         "version" : "6.52"
       },
       "LWP::DebugFile" : {
          "file" : "lib/LWP/DebugFile.pm",
-         "version" : "6.51"
+         "version" : "6.52"
       },
       "LWP::MemberMixin" : {
          "file" : "lib/LWP/MemberMixin.pm",
-         "version" : "6.51"
+         "version" : "6.52"
       },
       "LWP::Protocol" : {
          "file" : "lib/LWP/Protocol.pm",
-         "version" : "6.51"
+         "version" : "6.52"
       },
       "LWP::Protocol::cpan" : {
          "file" : "lib/LWP/Protocol/cpan.pm",
-         "version" : "6.51"
+         "version" : "6.52"
       },
       "LWP::Protocol::data" : {
          "file" : "lib/LWP/Protocol/data.pm",
-         "version" : "6.51"
+         "version" : "6.52"
       },
       "LWP::Protocol::file" : {
          "file" : "lib/LWP/Protocol/file.pm",
-         "version" : "6.51"
+         "version" : "6.52"
       },
       "LWP::Protocol::ftp" : {
          "file" : "lib/LWP/Protocol/ftp.pm",
-         "version" : "6.51"
+         "version" : "6.52"
       },
       "LWP::Protocol::gopher" : {
          "file" : "lib/LWP/Protocol/gopher.pm",
-         "version" : "6.51"
+         "version" : "6.52"
       },
       "LWP::Protocol::http" : {
          "file" : "lib/LWP/Protocol/http.pm",
-         "version" : "6.51"
+         "version" : "6.52"
       },
       "LWP::Protocol::loopback" : {
          "file" : "lib/LWP/Protocol/loopback.pm",
-         "version" : "6.51"
+         "version" : "6.52"
       },
       "LWP::Protocol::mailto" : {
          "file" : "lib/LWP/Protocol/mailto.pm",
-         "version" : "6.51"
+         "version" : "6.52"
       },
       "LWP::Protocol::nntp" : {
          "file" : "lib/LWP/Protocol/nntp.pm",
-         "version" : "6.51"
+         "version" : "6.52"
       },
       "LWP::Protocol::nogo" : {
          "file" : "lib/LWP/Protocol/nogo.pm",
-         "version" : "6.51"
+         "version" : "6.52"
       },
       "LWP::RobotUA" : {
          "file" : "lib/LWP/RobotUA.pm",
-         "version" : "6.51"
+         "version" : "6.52"
       },
       "LWP::Simple" : {
          "file" : "lib/LWP/Simple.pm",
-         "version" : "6.51"
+         "version" : "6.52"
       },
       "LWP::UserAgent" : {
          "file" : "lib/LWP/UserAgent.pm",
-         "version" : "6.51"
+         "version" : "6.52"
       }
    },
    "release_status" : "stable",
       "x_IRC" : "irc://irc.perl.org/#lwp",
       "x_MailingList" : "mailto:libwww@perl.org"
    },
-   "version" : "6.51",
+   "version" : "6.52",
    "x_Dist_Zilla" : {
       "perl" : {
          "version" : "5.026001"
             "class" : "Dist::Zilla::Plugin::Git::Contributors",
             "config" : {
                "Dist::Zilla::Plugin::Git::Contributors" : {
-                  "git_version" : "2.29.2",
+                  "git_version" : "2.30.0",
                   "include_authors" : 0,
                   "include_releaser" : 1,
                   "order_by" : "name",
                   "changelog" : "Changes"
                },
                "Dist::Zilla::Role::Git::Repo" : {
-                  "git_version" : "2.29.2",
+                  "git_version" : "2.30.0",
                   "repo_root" : "."
                }
             },
                   "changelog" : "Changes"
                },
                "Dist::Zilla::Role::Git::Repo" : {
-                  "git_version" : "2.29.2",
+                  "git_version" : "2.30.0",
                   "repo_root" : "."
                },
                "Dist::Zilla::Role::Git::StringFormatter" : {
                   "branch" : null,
                   "changelog" : "Changes",
                   "signed" : 0,
-                  "tag" : "v6.51",
+                  "tag" : "v6.52",
                   "tag_format" : "v%V",
                   "tag_message" : "v%V"
                },
                "Dist::Zilla::Role::Git::Repo" : {
-                  "git_version" : "2.29.2",
+                  "git_version" : "2.30.0",
                   "repo_root" : "."
                },
                "Dist::Zilla::Role::Git::StringFormatter" : {
                   "changelog" : "Changes"
                },
                "Dist::Zilla::Role::Git::Repo" : {
-                  "git_version" : "2.29.2",
+                  "git_version" : "2.30.0",
                   "repo_root" : "."
                },
                "Dist::Zilla::Role::Git::StringFormatter" : {
                   "remotes_must_exist" : 1
                },
                "Dist::Zilla::Role::Git::Repo" : {
-                  "git_version" : "2.29.2",
+                  "git_version" : "2.30.0",
                   "repo_root" : "."
                }
             },
index 4e409d70c3b231cfb8ad66ebf36e155d5626a01f..cfbedfa401e008f900e2944178e797528f1b2485 100644 (file)
--- a/META.yml
+++ b/META.yml
@@ -30,74 +30,74 @@ no_index:
 provides:
   LWP:
     file: lib/LWP.pm
-    version: '6.51'
+    version: '6.52'
   LWP::Authen::Basic:
     file: lib/LWP/Authen/Basic.pm
-    version: '6.51'
+    version: '6.52'
   LWP::Authen::Digest:
     file: lib/LWP/Authen/Digest.pm
-    version: '6.51'
+    version: '6.52'
   LWP::Authen::Ntlm:
     file: lib/LWP/Authen/Ntlm.pm
-    version: '6.51'
+    version: '6.52'
   LWP::ConnCache:
     file: lib/LWP/ConnCache.pm
-    version: '6.51'
+    version: '6.52'
   LWP::Debug:
     file: lib/LWP/Debug.pm
-    version: '6.51'
+    version: '6.52'
     x_deprecated: 1
   LWP::Debug::TraceHTTP:
     file: lib/LWP/Debug/TraceHTTP.pm
-    version: '6.51'
+    version: '6.52'
   LWP::DebugFile:
     file: lib/LWP/DebugFile.pm
-    version: '6.51'
+    version: '6.52'
   LWP::MemberMixin:
     file: lib/LWP/MemberMixin.pm
-    version: '6.51'
+    version: '6.52'
   LWP::Protocol:
     file: lib/LWP/Protocol.pm
-    version: '6.51'
+    version: '6.52'
   LWP::Protocol::cpan:
     file: lib/LWP/Protocol/cpan.pm
-    version: '6.51'
+    version: '6.52'
   LWP::Protocol::data:
     file: lib/LWP/Protocol/data.pm
-    version: '6.51'
+    version: '6.52'
   LWP::Protocol::file:
     file: lib/LWP/Protocol/file.pm
-    version: '6.51'
+    version: '6.52'
   LWP::Protocol::ftp:
     file: lib/LWP/Protocol/ftp.pm
-    version: '6.51'
+    version: '6.52'
   LWP::Protocol::gopher:
     file: lib/LWP/Protocol/gopher.pm
-    version: '6.51'
+    version: '6.52'
   LWP::Protocol::http:
     file: lib/LWP/Protocol/http.pm
-    version: '6.51'
+    version: '6.52'
   LWP::Protocol::loopback:
     file: lib/LWP/Protocol/loopback.pm
-    version: '6.51'
+    version: '6.52'
   LWP::Protocol::mailto:
     file: lib/LWP/Protocol/mailto.pm
-    version: '6.51'
+    version: '6.52'
   LWP::Protocol::nntp:
     file: lib/LWP/Protocol/nntp.pm
-    version: '6.51'
+    version: '6.52'
   LWP::Protocol::nogo:
     file: lib/LWP/Protocol/nogo.pm
-    version: '6.51'
+    version: '6.52'
   LWP::RobotUA:
     file: lib/LWP/RobotUA.pm
-    version: '6.51'
+    version: '6.52'
   LWP::Simple:
     file: lib/LWP/Simple.pm
-    version: '6.51'
+    version: '6.52'
   LWP::UserAgent:
     file: lib/LWP/UserAgent.pm
-    version: '6.51'
+    version: '6.52'
 requires:
   Digest::MD5: '0'
   Encode: '2.12'
@@ -134,7 +134,7 @@ resources:
   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.51'
+version: '6.52'
 x_Dist_Zilla:
   perl:
     version: '5.026001'
@@ -210,7 +210,7 @@ x_Dist_Zilla:
       class: Dist::Zilla::Plugin::Git::Contributors
       config:
         Dist::Zilla::Plugin::Git::Contributors:
-          git_version: 2.29.2
+          git_version: 2.30.0
           include_authors: 0
           include_releaser: 1
           order_by: name
@@ -481,7 +481,7 @@ x_Dist_Zilla:
           allow_dirty_match: []
           changelog: Changes
         Dist::Zilla::Role::Git::Repo:
-          git_version: 2.29.2
+          git_version: 2.30.0
           repo_root: .
       name: Git::Check
       version: '2.047'
@@ -579,7 +579,7 @@ x_Dist_Zilla:
           allow_dirty_match: []
           changelog: Changes
         Dist::Zilla::Role::Git::Repo:
-          git_version: 2.29.2
+          git_version: 2.30.0
           repo_root: .
         Dist::Zilla::Role::Git::StringFormatter:
           time_zone: local
@@ -592,11 +592,11 @@ x_Dist_Zilla:
           branch: ~
           changelog: Changes
           signed: 0
-          tag: v6.51
+          tag: v6.52
           tag_format: v%V
           tag_message: v%V
         Dist::Zilla::Role::Git::Repo:
-          git_version: 2.29.2
+          git_version: 2.30.0
           repo_root: .
         Dist::Zilla::Role::Git::StringFormatter:
           time_zone: local
@@ -634,7 +634,7 @@ x_Dist_Zilla:
             - (?^:^lib/.*\.pm$)
           changelog: Changes
         Dist::Zilla::Role::Git::Repo:
-          git_version: 2.29.2
+          git_version: 2.30.0
           repo_root: .
         Dist::Zilla::Role::Git::StringFormatter:
           time_zone: local
@@ -648,7 +648,7 @@ x_Dist_Zilla:
             - origin
           remotes_must_exist: 1
         Dist::Zilla::Role::Git::Repo:
-          git_version: 2.29.2
+          git_version: 2.30.0
           repo_root: .
       name: Git::Push
       version: '2.047'
index 6f33da1627df9d6bb63637c9786a3f9597444acd..37c43dd9b63ac22bcf223cadf199dcb1dddc645c 100644 (file)
@@ -86,7 +86,7 @@ my %WriteMakefileArgs = (
     "Test::Needs" => 0,
     "Test::RequiresInternet" => 0
   },
-  "VERSION" => "6.51",
+  "VERSION" => "6.52",
   "test" => {
     "TESTS" => "t/*.t t/base/*.t t/base/protocols/*.t t/leak/*.t t/local/*.t t/robot/*.t"
   }
index f88a69aafbfc3f8bf26ff42d154f214f47337f7f..32ed569072da7ac0d914270c97cbbfdc99a77895 100644 (file)
@@ -1,6 +1,6 @@
 package LWP;
 
-our $VERSION = '6.51';
+our $VERSION = '6.52';
 
 require LWP::UserAgent;  # this should load everything you need
 
index 6678d33b413a149f4b63f27c86f2666bf1df33db..0f007780f92a9e9341b7cd3a005fcb004ceb945d 100644 (file)
@@ -2,7 +2,7 @@ package LWP::Authen::Basic;
 
 use strict;
 
-our $VERSION = '6.51';
+our $VERSION = '6.52';
 
 require Encode;
 require MIME::Base64;
index 239aa576c7a8da86ddd771c220a3efd2366a845a..5e7e3fcb214d1101141a575213d6af688caddbfb 100644 (file)
@@ -3,7 +3,7 @@ package LWP::Authen::Digest;
 use strict;
 use base 'LWP::Authen::Basic';
 
-our $VERSION = '6.51';
+our $VERSION = '6.52';
 
 require Digest::MD5;
 
@@ -59,17 +59,7 @@ sub auth_header {
        @resp{qw(qop cnonce nc)} = ("auth", $cnonce, $nc);
     }
 
-    my(@order) = qw(username realm qop algorithm uri nonce nc cnonce response);
-    if($request->method =~ /^(?:POST|PUT)$/) {
-       $md5->add($request->content);
-       my $content = $md5->hexdigest;
-       $md5->reset;
-       $md5->add(join(":", @digest[0..1], $content));
-       $md5->reset;
-       $resp{"message-digest"} = $md5->hexdigest;
-       push(@order, "message-digest");
-    }
-    push(@order, "opaque");
+    my(@order) = qw(username realm qop algorithm uri nonce nc cnonce response opaque);
     my @pairs;
     for (@order) {
        next unless defined $resp{$_};
index dca44408f8b6ac11dbbd081af1f0515271358299..f6f7c92727c9cc33f5c21c8b376eefcec50b33a1 100644 (file)
@@ -2,7 +2,7 @@ package LWP::Authen::Ntlm;
 
 use strict;
 
-our $VERSION = '6.51';
+our $VERSION = '6.52';
 
 use Authen::NTLM "1.02";
 use MIME::Base64 "2.12";
index 80d9cbbffc0c153ddb2cef50ed4ab5d1ab31112c..a414e4cde3f376a68ad0fbc3542c9778f955d27f 100644 (file)
@@ -2,7 +2,7 @@ package LWP::ConnCache;
 
 use strict;
 
-our $VERSION = '6.51';
+our $VERSION = '6.52';
 our $DEBUG;
 
 sub new {
index fd28ec912c1e0338a28a0eba776cba0bf6549730..4769516d1a21274a33a8fc5b4abf040de2e7a332 100644 (file)
@@ -1,6 +1,6 @@
 package LWP::Debug;    # legacy
 
-our $VERSION = '6.51';
+our $VERSION = '6.52';
 
 require Exporter;
 our @ISA       = qw(Exporter);
index 7fe4836d8fa6c0167f84f6258acf638cddeeba03..89508c0ec311e4455446e8a5fc98f3bf822e3d64 100644 (file)
@@ -11,7 +11,7 @@ package LWP::Debug::TraceHTTP;
 use strict;
 use base 'LWP::Protocol::http';
 
-our $VERSION = '6.51';
+our $VERSION = '6.52';
 
 package # hide from PAUSE
     LWP::Debug::TraceHTTP::Socket;
index 20487d6820e078c3577b6b118ce96f5ecf734a90..acafa59dbd2e70c229e6a6ae44ea59b64558358e 100644 (file)
@@ -1,6 +1,6 @@
 package LWP::DebugFile;
 
-our $VERSION = '6.51';
+our $VERSION = '6.52';
 
 # legacy stub
 
index 832e989fcb4809a91731e4a0f7b8febfca13f213..2da8ddbfef80024359dc6c32558c038f1ec0ffd2 100644 (file)
@@ -1,6 +1,6 @@
 package LWP::MemberMixin;
 
-our $VERSION = '6.51';
+our $VERSION = '6.52';
 
 sub _elem {
     my $self = shift;
index 5a16392e2a0ecf5d7ed1af53f202023427b77bb3..e38e6799958697c534f54b4fd7e1accfa3b970c4 100644 (file)
@@ -2,7 +2,7 @@ package LWP::Protocol;
 
 use base 'LWP::MemberMixin';
 
-our $VERSION = '6.51';
+our $VERSION = '6.52';
 
 use strict;
 use Carp ();
index 8658f84b25e3974ffb240075a613a026eb44a33b..73087090ecc40c3bcbe96b8a7476bdc69489da8d 100644 (file)
@@ -4,7 +4,7 @@ use strict;
 
 use base qw(LWP::Protocol);
 
-our $VERSION = '6.51';
+our $VERSION = '6.52';
 
 require URI;
 require HTTP::Status;
index 9a5c756d4a22545aef5b972f8b875544255ea95f..fa2daa32de2f154252a3a26597da9c4b2268fcb0 100644 (file)
@@ -4,7 +4,7 @@ package LWP::Protocol::data;
 
 use strict;
 
-our $VERSION = '6.51';
+our $VERSION = '6.52';
 
 require HTTP::Response;
 require HTTP::Status;
index 1152580dc66077a64bfcadfbba8c4bfea04af820..06f45e623846ec84515ac2b2e1edd534f6263c5b 100644 (file)
@@ -4,7 +4,7 @@ use base qw(LWP::Protocol);
 
 use strict;
 
-our $VERSION = '6.51';
+our $VERSION = '6.52';
 
 require LWP::MediaTypes;
 require HTTP::Request;
index 3dd2cb10afd16fbaa598b8b7e482ce528d9bac1a..d7415d73ff00d559086582df8e388b6e3d7a7d36 100644 (file)
@@ -5,7 +5,7 @@ package LWP::Protocol::ftp;
 use base qw(LWP::Protocol);
 use strict;
 
-our $VERSION = '6.51';
+our $VERSION = '6.52';
 
 use Carp            ();
 use HTTP::Status    ();
index 709d369c8c7c078d4f7ef514deaa53f20772b8cb..c38c7a6e33391a2f32b479473287fe0ce173fb63 100644 (file)
@@ -9,7 +9,7 @@ package LWP::Protocol::gopher;
 
 use strict;
 
-our $VERSION = '6.51';
+our $VERSION = '6.52';
 
 require HTTP::Response;
 require HTTP::Status;
index 315cfba87c81dac3d1def1c4b170c7bd17c8a363..58827a1ad0f5e24201fe4b3249d3e8dc9a2373b2 100644 (file)
@@ -2,7 +2,7 @@ package LWP::Protocol::http;
 
 use strict;
 
-our $VERSION = '6.51';
+our $VERSION = '6.52';
 
 require HTTP::Response;
 require HTTP::Status;
index df5ce75580d5aaaaaf7b6e44ebc76cbcce73844b..b81ffcb09bf156cfe611844cfd7b175197b697af 100644 (file)
@@ -2,7 +2,7 @@ package LWP::Protocol::loopback;
 
 use strict;
 
-our $VERSION = '6.51';
+our $VERSION = '6.52';
 
 require HTTP::Response;
 
index aaeb6982ee3ddb02d13c39ff5791ca75a4aa1b0a..71f0319152d564a640b52707d87b2c1bea328201 100644 (file)
@@ -11,7 +11,7 @@ require HTTP::Status;
 use Carp;
 use strict;
 
-our $VERSION = '6.51';
+our $VERSION = '6.52';
 
 use base qw(LWP::Protocol);
 our $SENDMAIL;
index 703e5e5560724ae8daf513362d2671c72e45787d..33f16dfa2e9199057c6d14397a5f6b9045c64d47 100644 (file)
@@ -4,7 +4,7 @@ package LWP::Protocol::nntp;
 
 use base qw(LWP::Protocol);
 
-our $VERSION = '6.51';
+our $VERSION = '6.52';
 
 require HTTP::Response;
 require HTTP::Status;
index cb8633263475273d7799acea640758b0ab4e7015..ff9e4b22a9c44dc638d6e11ef2a8a8f61a6f91b1 100644 (file)
@@ -7,7 +7,7 @@ package LWP::Protocol::nogo;
 
 use strict;
 
-our $VERSION = '6.51';
+our $VERSION = '6.52';
 
 require HTTP::Response;
 require HTTP::Status;
index 7b3a00e90d775f0c9375e7afa264982bcafffcc7..6523698f3b92e25d6a36e1b1360d9e86fa7f5428 100644 (file)
@@ -2,7 +2,7 @@ package LWP::RobotUA;
 
 use base qw(LWP::UserAgent);
 
-our $VERSION = '6.51';
+our $VERSION = '6.52';
 
 require WWW::RobotRules;
 require HTTP::Request;
index d3f9cd2d9f8a77e53c8cda11b217c9d46f4cdd0a..9d4c58d5cb704dcc1de1885fd5872ca0f1740362 100644 (file)
@@ -2,7 +2,7 @@ package LWP::Simple;
 
 use strict;
 
-our $VERSION = '6.51';
+our $VERSION = '6.52';
 
 require Exporter;
 
index 8fa92ef4e0b77cbf8f89cd8fb10358d81c803861..c67b13041e2b80699b2dd8f929654c4bb7d90df5 100644 (file)
@@ -15,7 +15,7 @@ use LWP::Protocol ();
 use Scalar::Util qw(blessed);
 use Try::Tiny qw(try catch);
 
-our $VERSION = '6.51';
+our $VERSION = '6.52';
 
 sub new
 {
index f70671ec0bf62d88a3d01d9a1056d0e19fe546c8..165d50d91620c0db3913974440e83eec653e0039 100644 (file)
@@ -8,7 +8,7 @@ if (($ENV{TRAVIS_PULL_REQUEST} || '') eq 'false') {
 
 note 'Checking Changes';
 my $changes_file = 'Changes';
-my $newver = '6.51';
+my $newver = '6.52';
 my $trial_token = '-TRIAL';
 my $encoding = 'UTF-8';