Script 'mail_helper' called by obssrc
Hello community,
here is the log from the commit of package perl-libwww-perl for
openSUSE:Factory checked in at 2021-08-25 20:56:36
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Comparing /work/SRC/openSUSE:Factory/perl-libwww-perl (Old)
and /work/SRC/openSUSE:Factory/.perl-libwww-perl.new.1899 (New)
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Package is "perl-libwww-perl"
Wed Aug 25 20:56:36 2021 rev:76 rq:913812 version:6.56
Changes:
--------
--- /work/SRC/openSUSE:Factory/perl-libwww-perl/perl-libwww-perl.changes
2021-06-24 18:22:09.972889062 +0200
+++
/work/SRC/openSUSE:Factory/.perl-libwww-perl.new.1899/perl-libwww-perl.changes
2021-08-25 20:57:17.173233817 +0200
@@ -1,0 +2,12 @@
+Wed Aug 18 03:07:35 UTC 2021 - Tina M??ller <[email protected]>
+
+- updated to 6.56
+ see /usr/share/doc/packages/perl-libwww-perl/Changes
+
+ 6.56 2021-08-17 13:57:12Z
+ - Update the CONTRIBUTING doc to no longer reference TravisCI. (GH #384)
(Slaven Rezi??)
+ - Increase test coverage for env_proxy() (GH#383) (Slaven Rezi??)
+ - When a truthy Content-Type is provided, override the default (GH#385)
+ (Matthew Horsfall (alh))
+
+-------------------------------------------------------------------
Old:
----
libwww-perl-6.55.tar.gz
New:
----
libwww-perl-6.56.tar.gz
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Other differences:
------------------
++++++ perl-libwww-perl.spec ++++++
--- /var/tmp/diff_new_pack.rIkCKh/_old 2021-08-25 20:57:18.073232636 +0200
+++ /var/tmp/diff_new_pack.rIkCKh/_new 2021-08-25 20:57:18.077232631 +0200
@@ -18,7 +18,7 @@
%define cpan_name libwww-perl
Name: perl-libwww-perl
-Version: 6.55
+Version: 6.56
Release: 0
Summary: The World-Wide Web library for Perl
License: Artistic-1.0 OR GPL-1.0-or-later
++++++ libwww-perl-6.55.tar.gz -> libwww-perl-6.56.tar.gz ++++++
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/libwww-perl-6.55/CONTRIBUTING.md
new/libwww-perl-6.56/CONTRIBUTING.md
--- old/libwww-perl-6.55/CONTRIBUTING.md 2021-06-17 15:57:12.000000000
+0200
+++ new/libwww-perl-6.56/CONTRIBUTING.md 2021-08-17 15:57:18.000000000
+0200
@@ -59,10 +59,9 @@
https://help.github.com/articles/creating-a-pull-request
-All pull requests for this distribution will be automatically tested on Linux
-by Travis at: https://travis-ci.com/libwww-perl/libwww-perl
-Results will be visible in the pull request on GitHub. Follow the appropriate
-links for details when tests fail.
+All pull requests for this distribution will be automatically tested on Linux,
+MacOS, and Windows by GitHub Workflows. Results will be visible in the pull
+request on GitHub. Follow the appropriate links for details when tests fail.
If you have found a bug, but do not have an accompanying patch to fix it, you
can submit an issue report here:
@@ -116,8 +115,8 @@
This distribution maintains the generated `META.json` and either `Makefile.PL`
or `Build.PL` in the repository. This allows two things:
-[Travis CI](https://travis-ci.org/) can build and test the distribution without
-requiring Dist::Zilla, and the distribution can be installed directly from
+GitHub Workflows can build and test the distribution without requiring
+Dist::Zilla, and the distribution can be installed directly from
Github or a local git repository using `cpanm` for testing (again, not
requiring Dist::Zilla).
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/libwww-perl-6.55/Changes new/libwww-perl-6.56/Changes
--- old/libwww-perl-6.55/Changes 2021-06-17 15:57:11.000000000 +0200
+++ new/libwww-perl-6.56/Changes 2021-08-17 15:57:18.000000000 +0200
@@ -1,5 +1,11 @@
Change history for libwww-perl
+6.56 2021-08-17 13:57:12Z
+ - Update the CONTRIBUTING doc to no longer reference TravisCI. (GH #384)
(Slaven Rezi??)
+ - Increase test coverage for env_proxy() (GH#383) (Slaven Rezi??)
+ - When a truthy Content-Type is provided, override the default (GH#385)
+ (Matthew Horsfall (alh))
+
6.55 2021-06-17 13:57:06Z
- Attempt to avoid rare fails in redirect.t (GH#380) (Arne Johannessen)
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/libwww-perl-6.55/LICENSE new/libwww-perl-6.56/LICENSE
--- old/libwww-perl-6.55/LICENSE 2021-06-17 15:57:11.000000000 +0200
+++ new/libwww-perl-6.56/LICENSE 2021-08-17 15:57:18.000000000 +0200
@@ -292,21 +292,21 @@
- "Package" refers to the collection of files distributed by the Copyright
Holder, and derivatives of that collection of files created through
- textual modification.
+ textual modification.
- "Standard Version" refers to such a Package if it has not been modified,
or has been modified in accordance with the wishes of the Copyright
- Holder.
+ Holder.
- "Copyright Holder" is whoever is named in the copyright or copyrights for
- the package.
+ the package.
- "You" is you, if you're thinking about copying or distributing this
Package.
- "Reasonable copying fee" is whatever you can justify on the basis of media
cost, duplication charges, time of people involved, and so on. (You will
not be required to justify it to the Copyright Holder, but only to the
- computing community at large as a market that must bear the fee.)
+ computing community at large as a market that must bear the fee.)
- "Freely Available" means that no fee is charged for the item itself, though
there may be fees involved in handling the item. It also means that
recipients of the item may redistribute it under the same conditions they
- received it.
+ received it.
1. You may make and give away verbatim copies of the source form of the
Standard Version of this Package without restriction, provided that you
@@ -373,7 +373,7 @@
9. THIS PACKAGE IS PROVIDED "AS IS" AND WITHOUT ANY EXPRESS OR IMPLIED
WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED WARRANTIES OF
-MERCHANTIBILITY AND FITNESS FOR A PARTICULAR PURPOSE.
+MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE.
The End
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/libwww-perl-6.55/MANIFEST
new/libwww-perl-6.56/MANIFEST
--- old/libwww-perl-6.55/MANIFEST 2021-06-17 15:57:11.000000000 +0200
+++ new/libwww-perl-6.56/MANIFEST 2021-08-17 15:57:18.000000000 +0200
@@ -1,4 +1,4 @@
-# This file was automatically generated by Dist::Zilla::Plugin::Manifest
v6.020.
+# This file was automatically generated by Dist::Zilla::Plugin::Manifest
v6.024.
CONTRIBUTING.md
Changes
INSTALL
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/libwww-perl-6.55/META.json
new/libwww-perl-6.56/META.json
--- old/libwww-perl-6.55/META.json 2021-06-17 15:57:11.000000000 +0200
+++ new/libwww-perl-6.56/META.json 2021-08-17 15:57:18.000000000 +0200
@@ -4,7 +4,7 @@
"Gisle Aas <[email protected]>"
],
"dynamic_config" : 1,
- "generated_by" : "Dist::Zilla version 6.020, CPAN::Meta::Converter version
2.150010",
+ "generated_by" : "Dist::Zilla version 6.024, CPAN::Meta::Converter version
2.150010",
"license" : [
"perl_5"
],
@@ -109,96 +109,96 @@
"provides" : {
"LWP" : {
"file" : "lib/LWP.pm",
- "version" : "6.55"
+ "version" : "6.56"
},
"LWP::Authen::Basic" : {
"file" : "lib/LWP/Authen/Basic.pm",
- "version" : "6.55"
+ "version" : "6.56"
},
"LWP::Authen::Digest" : {
"file" : "lib/LWP/Authen/Digest.pm",
- "version" : "6.55"
+ "version" : "6.56"
},
"LWP::Authen::Ntlm" : {
"file" : "lib/LWP/Authen/Ntlm.pm",
- "version" : "6.55"
+ "version" : "6.56"
},
"LWP::ConnCache" : {
"file" : "lib/LWP/ConnCache.pm",
- "version" : "6.55"
+ "version" : "6.56"
},
"LWP::Debug" : {
"file" : "lib/LWP/Debug.pm",
- "version" : "6.55",
+ "version" : "6.56",
"x_deprecated" : 1
},
"LWP::Debug::TraceHTTP" : {
"file" : "lib/LWP/Debug/TraceHTTP.pm",
- "version" : "6.55"
+ "version" : "6.56"
},
"LWP::DebugFile" : {
"file" : "lib/LWP/DebugFile.pm",
- "version" : "6.55"
+ "version" : "6.56"
},
"LWP::MemberMixin" : {
"file" : "lib/LWP/MemberMixin.pm",
- "version" : "6.55"
+ "version" : "6.56"
},
"LWP::Protocol" : {
"file" : "lib/LWP/Protocol.pm",
- "version" : "6.55"
+ "version" : "6.56"
},
"LWP::Protocol::cpan" : {
"file" : "lib/LWP/Protocol/cpan.pm",
- "version" : "6.55"
+ "version" : "6.56"
},
"LWP::Protocol::data" : {
"file" : "lib/LWP/Protocol/data.pm",
- "version" : "6.55"
+ "version" : "6.56"
},
"LWP::Protocol::file" : {
"file" : "lib/LWP/Protocol/file.pm",
- "version" : "6.55"
+ "version" : "6.56"
},
"LWP::Protocol::ftp" : {
"file" : "lib/LWP/Protocol/ftp.pm",
- "version" : "6.55"
+ "version" : "6.56"
},
"LWP::Protocol::gopher" : {
"file" : "lib/LWP/Protocol/gopher.pm",
- "version" : "6.55"
+ "version" : "6.56"
},
"LWP::Protocol::http" : {
"file" : "lib/LWP/Protocol/http.pm",
- "version" : "6.55"
+ "version" : "6.56"
},
"LWP::Protocol::loopback" : {
"file" : "lib/LWP/Protocol/loopback.pm",
- "version" : "6.55"
+ "version" : "6.56"
},
"LWP::Protocol::mailto" : {
"file" : "lib/LWP/Protocol/mailto.pm",
- "version" : "6.55"
+ "version" : "6.56"
},
"LWP::Protocol::nntp" : {
"file" : "lib/LWP/Protocol/nntp.pm",
- "version" : "6.55"
+ "version" : "6.56"
},
"LWP::Protocol::nogo" : {
"file" : "lib/LWP/Protocol/nogo.pm",
- "version" : "6.55"
+ "version" : "6.56"
},
"LWP::RobotUA" : {
"file" : "lib/LWP/RobotUA.pm",
- "version" : "6.55"
+ "version" : "6.56"
},
"LWP::Simple" : {
"file" : "lib/LWP/Simple.pm",
- "version" : "6.55"
+ "version" : "6.56"
},
"LWP::UserAgent" : {
"file" : "lib/LWP/UserAgent.pm",
- "version" : "6.55"
+ "version" : "6.56"
}
},
"release_status" : "stable",
@@ -215,7 +215,7 @@
"x_IRC" : "irc://irc.perl.org/#lwp",
"x_MailingList" : "mailto:[email protected]";
},
- "version" : "6.55",
+ "version" : "6.56",
"x_Dist_Zilla" : {
"perl" : {
"version" : "5.030003"
@@ -242,12 +242,12 @@
}
},
"name" : "Git::GatherDir",
- "version" : "2.047"
+ "version" : "2.048"
},
{
"class" : "Dist::Zilla::Plugin::MetaConfig",
"name" : "MetaConfig",
- "version" : "6.020"
+ "version" : "6.024"
},
{
"class" : "Dist::Zilla::Plugin::MetaProvides::Package",
@@ -257,7 +257,7 @@
{
"class" : "Dist::Zilla::Plugin::FinderCode",
"name" :
"MetaProvides::Package/AUTOVIV/:InstallModulesPM",
- "version" : "6.020"
+ "version" : "6.024"
}
],
"include_underscores" : 0
@@ -279,22 +279,22 @@
{
"class" : "Dist::Zilla::Plugin::MetaNoIndex",
"name" : "MetaNoIndex",
- "version" : "6.020"
+ "version" : "6.024"
},
{
"class" : "Dist::Zilla::Plugin::MetaYAML",
"name" : "MetaYAML",
- "version" : "6.020"
+ "version" : "6.024"
},
{
"class" : "Dist::Zilla::Plugin::MetaJSON",
"name" : "MetaJSON",
- "version" : "6.020"
+ "version" : "6.024"
},
{
"class" : "Dist::Zilla::Plugin::MetaResources",
"name" : "MetaResources",
- "version" : "6.020"
+ "version" : "6.024"
},
{
"class" : "Dist::Zilla::Plugin::Deprecated",
@@ -331,12 +331,12 @@
{
"class" : "Dist::Zilla::Plugin::Manifest",
"name" : "Manifest",
- "version" : "6.020"
+ "version" : "6.024"
},
{
"class" : "Dist::Zilla::Plugin::License",
"name" : "License",
- "version" : "6.020"
+ "version" : "6.024"
},
{
"class" : "Dist::Zilla::Plugin::InstallGuide",
@@ -352,7 +352,7 @@
{
"class" : "Dist::Zilla::Plugin::ExecDir",
"name" : "ExecDir",
- "version" : "6.020"
+ "version" : "6.024"
},
{
"class" : "Dist::Zilla::Plugin::Prereqs::FromCPANfile",
@@ -375,11 +375,11 @@
"config" : {
"Dist::Zilla::Plugin::MakeMaker" : {
"make_path" : "make",
- "version" : "6.020"
+ "version" : "6.024"
},
"Dist::Zilla::Role::TestRunner" : {
- "default_jobs" : "4",
- "version" : "6.020"
+ "default_jobs" : "1",
+ "version" : "6.024"
}
},
"name" : "MakeMaker::Awesome",
@@ -477,7 +477,7 @@
{
"class" : "Dist::Zilla::Plugin::PodSyntaxTests",
"name" : "PodSyntaxTests",
- "version" : "6.020"
+ "version" : "6.024"
},
{
"class" : "Dist::Zilla::Plugin::Test::Pod::Coverage::Configurable",
@@ -633,7 +633,7 @@
}
},
"name" : "Git::Check",
- "version" : "2.047"
+ "version" : "2.048"
},
{
"class" : "Dist::Zilla::Plugin::CheckStrictVersion",
@@ -644,7 +644,7 @@
"class" : "Dist::Zilla::Plugin::RunExtraTests",
"config" : {
"Dist::Zilla::Role::TestRunner" : {
- "default_jobs" : "4"
+ "default_jobs" : "1"
}
},
"name" : "RunExtraTests",
@@ -663,12 +663,12 @@
{
"class" : "Dist::Zilla::Plugin::TestRelease",
"name" : "TestRelease",
- "version" : "6.020"
+ "version" : "6.024"
},
{
"class" : "Dist::Zilla::Plugin::UploadToCPAN",
"name" : "UploadToCPAN",
- "version" : "6.020"
+ "version" : "6.024"
},
{
"class" : "Dist::Zilla::Plugin::ReadmeAnyFromPod",
@@ -703,7 +703,7 @@
}
},
"name" : "@Git::VersionManager/pluginbundle version",
- "version" : "6.020"
+ "version" : "6.024"
},
{
"class" : "Dist::Zilla::Plugin::RewriteVersion::Transitional",
@@ -767,7 +767,7 @@
}
},
"name" : "@Git::VersionManager/release snapshot",
- "version" : "2.047"
+ "version" : "2.048"
},
{
"class" : "Dist::Zilla::Plugin::Git::Tag",
@@ -776,7 +776,7 @@
"branch" : null,
"changelog" : "Changes",
"signed" : 0,
- "tag" : "v6.55",
+ "tag" : "v6.56",
"tag_format" : "v%V",
"tag_message" : "v%V"
},
@@ -789,7 +789,7 @@
}
},
"name" : "@Git::VersionManager/Git::Tag",
- "version" : "2.047"
+ "version" : "2.048"
},
{
"class" :
"Dist::Zilla::Plugin::BumpVersionAfterRelease::Transitional",
@@ -810,7 +810,7 @@
{
"class" : "Dist::Zilla::Plugin::NextRelease",
"name" : "@Git::VersionManager/NextRelease",
- "version" : "6.020"
+ "version" : "6.024"
},
{
"class" : "Dist::Zilla::Plugin::Git::Commit",
@@ -840,7 +840,7 @@
}
},
"name" : "@Git::VersionManager/post-release commit",
- "version" : "2.047"
+ "version" : "2.048"
},
{
"class" : "Dist::Zilla::Plugin::Git::Push",
@@ -857,67 +857,67 @@
}
},
"name" : "Git::Push",
- "version" : "2.047"
+ "version" : "2.048"
},
{
"class" : "Dist::Zilla::Plugin::ConfirmRelease",
"name" : "ConfirmRelease",
- "version" : "6.020"
+ "version" : "6.024"
},
{
"class" : "Dist::Zilla::Plugin::FinderCode",
"name" : ":InstallModules",
- "version" : "6.020"
+ "version" : "6.024"
},
{
"class" : "Dist::Zilla::Plugin::FinderCode",
"name" : ":IncModules",
- "version" : "6.020"
+ "version" : "6.024"
},
{
"class" : "Dist::Zilla::Plugin::FinderCode",
"name" : ":TestFiles",
- "version" : "6.020"
+ "version" : "6.024"
},
{
"class" : "Dist::Zilla::Plugin::FinderCode",
"name" : ":ExtraTestFiles",
- "version" : "6.020"
+ "version" : "6.024"
},
{
"class" : "Dist::Zilla::Plugin::FinderCode",
"name" : ":ExecFiles",
- "version" : "6.020"
+ "version" : "6.024"
},
{
"class" : "Dist::Zilla::Plugin::FinderCode",
"name" : ":PerlExecFiles",
- "version" : "6.020"
+ "version" : "6.024"
},
{
"class" : "Dist::Zilla::Plugin::FinderCode",
"name" : ":ShareFiles",
- "version" : "6.020"
+ "version" : "6.024"
},
{
"class" : "Dist::Zilla::Plugin::FinderCode",
"name" : ":MainModule",
- "version" : "6.020"
+ "version" : "6.024"
},
{
"class" : "Dist::Zilla::Plugin::FinderCode",
"name" : ":AllFiles",
- "version" : "6.020"
+ "version" : "6.024"
},
{
"class" : "Dist::Zilla::Plugin::FinderCode",
"name" : ":NoFiles",
- "version" : "6.020"
+ "version" : "6.024"
},
{
"class" : "Dist::Zilla::Plugin::FinderCode",
"name" : "MetaProvides::Package/AUTOVIV/:InstallModulesPM",
- "version" : "6.020"
+ "version" : "6.024"
}
],
"zilla" : {
@@ -925,7 +925,7 @@
"config" : {
"is_trial" : 0
},
- "version" : "6.020"
+ "version" : "6.024"
}
},
"x_contributors" : [
@@ -1012,6 +1012,7 @@
"Shoichi Kaji <[email protected]>",
"simbabque <[email protected]>",
"Slaven Rezic <[email protected]>",
+ "Slaven Rezic <[email protected]>",
"Spiros Denaxas <[email protected]>",
"Steffen Ullrich <[email protected]>",
"Steve Hay <[email protected]>",
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/libwww-perl-6.55/META.yml
new/libwww-perl-6.56/META.yml
--- old/libwww-perl-6.55/META.yml 2021-06-17 15:57:11.000000000 +0200
+++ new/libwww-perl-6.56/META.yml 2021-08-17 15:57:18.000000000 +0200
@@ -18,7 +18,7 @@
Getopt::Long: '0'
Module::Metadata: '0'
dynamic_config: 1
-generated_by: 'Dist::Zilla version 6.020, CPAN::Meta::Converter version
2.150010'
+generated_by: 'Dist::Zilla version 6.024, CPAN::Meta::Converter version
2.150010'
license: perl
meta-spec:
url: http://module-build.sourceforge.net/META-spec-v1.4.html
@@ -31,74 +31,74 @@
provides:
LWP:
file: lib/LWP.pm
- version: '6.55'
+ version: '6.56'
LWP::Authen::Basic:
file: lib/LWP/Authen/Basic.pm
- version: '6.55'
+ version: '6.56'
LWP::Authen::Digest:
file: lib/LWP/Authen/Digest.pm
- version: '6.55'
+ version: '6.56'
LWP::Authen::Ntlm:
file: lib/LWP/Authen/Ntlm.pm
- version: '6.55'
+ version: '6.56'
LWP::ConnCache:
file: lib/LWP/ConnCache.pm
- version: '6.55'
+ version: '6.56'
LWP::Debug:
file: lib/LWP/Debug.pm
- version: '6.55'
+ version: '6.56'
x_deprecated: 1
LWP::Debug::TraceHTTP:
file: lib/LWP/Debug/TraceHTTP.pm
- version: '6.55'
+ version: '6.56'
LWP::DebugFile:
file: lib/LWP/DebugFile.pm
- version: '6.55'
+ version: '6.56'
LWP::MemberMixin:
file: lib/LWP/MemberMixin.pm
- version: '6.55'
+ version: '6.56'
LWP::Protocol:
file: lib/LWP/Protocol.pm
- version: '6.55'
+ version: '6.56'
LWP::Protocol::cpan:
file: lib/LWP/Protocol/cpan.pm
- version: '6.55'
+ version: '6.56'
LWP::Protocol::data:
file: lib/LWP/Protocol/data.pm
- version: '6.55'
+ version: '6.56'
LWP::Protocol::file:
file: lib/LWP/Protocol/file.pm
- version: '6.55'
+ version: '6.56'
LWP::Protocol::ftp:
file: lib/LWP/Protocol/ftp.pm
- version: '6.55'
+ version: '6.56'
LWP::Protocol::gopher:
file: lib/LWP/Protocol/gopher.pm
- version: '6.55'
+ version: '6.56'
LWP::Protocol::http:
file: lib/LWP/Protocol/http.pm
- version: '6.55'
+ version: '6.56'
LWP::Protocol::loopback:
file: lib/LWP/Protocol/loopback.pm
- version: '6.55'
+ version: '6.56'
LWP::Protocol::mailto:
file: lib/LWP/Protocol/mailto.pm
- version: '6.55'
+ version: '6.56'
LWP::Protocol::nntp:
file: lib/LWP/Protocol/nntp.pm
- version: '6.55'
+ version: '6.56'
LWP::Protocol::nogo:
file: lib/LWP/Protocol/nogo.pm
- version: '6.55'
+ version: '6.56'
LWP::RobotUA:
file: lib/LWP/RobotUA.pm
- version: '6.55'
+ version: '6.56'
LWP::Simple:
file: lib/LWP/Simple.pm
- version: '6.55'
+ version: '6.56'
LWP::UserAgent:
file: lib/LWP/UserAgent.pm
- version: '6.55'
+ version: '6.56'
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.55'
+version: '6.56'
x_Dist_Zilla:
perl:
version: '5.030003'
@@ -156,11 +156,11 @@
Dist::Zilla::Plugin::Git::GatherDir:
include_untracked: 0
name: Git::GatherDir
- version: '2.047'
+ version: '2.048'
-
class: Dist::Zilla::Plugin::MetaConfig
name: MetaConfig
- version: '6.020'
+ version: '6.024'
-
class: Dist::Zilla::Plugin::MetaProvides::Package
config:
@@ -169,7 +169,7 @@
-
class: Dist::Zilla::Plugin::FinderCode
name: MetaProvides::Package/AUTOVIV/:InstallModulesPM
- version: '6.020'
+ version: '6.024'
include_underscores: 0
Dist::Zilla::Role::MetaProvider::Provider:
$Dist::Zilla::Role::MetaProvider::Provider::VERSION: '2.002004'
@@ -184,19 +184,19 @@
-
class: Dist::Zilla::Plugin::MetaNoIndex
name: MetaNoIndex
- version: '6.020'
+ version: '6.024'
-
class: Dist::Zilla::Plugin::MetaYAML
name: MetaYAML
- version: '6.020'
+ version: '6.024'
-
class: Dist::Zilla::Plugin::MetaJSON
name: MetaJSON
- version: '6.020'
+ version: '6.024'
-
class: Dist::Zilla::Plugin::MetaResources
name: MetaResources
- version: '6.020'
+ version: '6.024'
-
class: Dist::Zilla::Plugin::Deprecated
config:
@@ -224,11 +224,11 @@
-
class: Dist::Zilla::Plugin::Manifest
name: Manifest
- version: '6.020'
+ version: '6.024'
-
class: Dist::Zilla::Plugin::License
name: License
- version: '6.020'
+ version: '6.024'
-
class: Dist::Zilla::Plugin::InstallGuide
config:
@@ -240,7 +240,7 @@
-
class: Dist::Zilla::Plugin::ExecDir
name: ExecDir
- version: '6.020'
+ version: '6.024'
-
class: Dist::Zilla::Plugin::Prereqs::FromCPANfile
name: Prereqs::FromCPANfile
@@ -258,10 +258,10 @@
config:
Dist::Zilla::Plugin::MakeMaker:
make_path: make
- version: '6.020'
+ version: '6.024'
Dist::Zilla::Role::TestRunner:
- default_jobs: '4'
- version: '6.020'
+ default_jobs: '1'
+ version: '6.024'
name: MakeMaker::Awesome
version: '0.48'
-
@@ -335,7 +335,7 @@
-
class: Dist::Zilla::Plugin::PodSyntaxTests
name: PodSyntaxTests
- version: '6.020'
+ version: '6.024'
-
class: Dist::Zilla::Plugin::Test::Pod::Coverage::Configurable
name: Test::Pod::Coverage::Configurable
@@ -480,7 +480,7 @@
git_version: 2.32.0
repo_root: .
name: Git::Check
- version: '2.047'
+ version: '2.048'
-
class: Dist::Zilla::Plugin::CheckStrictVersion
name: CheckStrictVersion
@@ -489,7 +489,7 @@
class: Dist::Zilla::Plugin::RunExtraTests
config:
Dist::Zilla::Role::TestRunner:
- default_jobs: '4'
+ default_jobs: '1'
name: RunExtraTests
version: '0.029'
-
@@ -503,11 +503,11 @@
-
class: Dist::Zilla::Plugin::TestRelease
name: TestRelease
- version: '6.020'
+ version: '6.024'
-
class: Dist::Zilla::Plugin::UploadToCPAN
name: UploadToCPAN
- version: '6.020'
+ version: '6.024'
-
class: Dist::Zilla::Plugin::ReadmeAnyFromPod
config:
@@ -532,7 +532,7 @@
phase: develop
type: recommends
name: '@Git::VersionManager/pluginbundle version'
- version: '6.020'
+ version: '6.024'
-
class: Dist::Zilla::Plugin::RewriteVersion::Transitional
config:
@@ -580,7 +580,7 @@
Dist::Zilla::Role::Git::StringFormatter:
time_zone: local
name: '@Git::VersionManager/release snapshot'
- version: '2.047'
+ version: '2.048'
-
class: Dist::Zilla::Plugin::Git::Tag
config:
@@ -588,7 +588,7 @@
branch: ~
changelog: Changes
signed: 0
- tag: v6.55
+ tag: v6.56
tag_format: v%V
tag_message: v%V
Dist::Zilla::Role::Git::Repo:
@@ -597,7 +597,7 @@
Dist::Zilla::Role::Git::StringFormatter:
time_zone: local
name: '@Git::VersionManager/Git::Tag'
- version: '2.047'
+ version: '2.048'
-
class: Dist::Zilla::Plugin::BumpVersionAfterRelease::Transitional
config:
@@ -613,7 +613,7 @@
-
class: Dist::Zilla::Plugin::NextRelease
name: '@Git::VersionManager/NextRelease'
- version: '6.020'
+ version: '6.024'
-
class: Dist::Zilla::Plugin::Git::Commit
config:
@@ -635,7 +635,7 @@
Dist::Zilla::Role::Git::StringFormatter:
time_zone: local
name: '@Git::VersionManager/post-release commit'
- version: '2.047'
+ version: '2.048'
-
class: Dist::Zilla::Plugin::Git::Push
config:
@@ -647,60 +647,60 @@
git_version: 2.32.0
repo_root: .
name: Git::Push
- version: '2.047'
+ version: '2.048'
-
class: Dist::Zilla::Plugin::ConfirmRelease
name: ConfirmRelease
- version: '6.020'
+ version: '6.024'
-
class: Dist::Zilla::Plugin::FinderCode
name: ':InstallModules'
- version: '6.020'
+ version: '6.024'
-
class: Dist::Zilla::Plugin::FinderCode
name: ':IncModules'
- version: '6.020'
+ version: '6.024'
-
class: Dist::Zilla::Plugin::FinderCode
name: ':TestFiles'
- version: '6.020'
+ version: '6.024'
-
class: Dist::Zilla::Plugin::FinderCode
name: ':ExtraTestFiles'
- version: '6.020'
+ version: '6.024'
-
class: Dist::Zilla::Plugin::FinderCode
name: ':ExecFiles'
- version: '6.020'
+ version: '6.024'
-
class: Dist::Zilla::Plugin::FinderCode
name: ':PerlExecFiles'
- version: '6.020'
+ version: '6.024'
-
class: Dist::Zilla::Plugin::FinderCode
name: ':ShareFiles'
- version: '6.020'
+ version: '6.024'
-
class: Dist::Zilla::Plugin::FinderCode
name: ':MainModule'
- version: '6.020'
+ version: '6.024'
-
class: Dist::Zilla::Plugin::FinderCode
name: ':AllFiles'
- version: '6.020'
+ version: '6.024'
-
class: Dist::Zilla::Plugin::FinderCode
name: ':NoFiles'
- version: '6.020'
+ version: '6.024'
-
class: Dist::Zilla::Plugin::FinderCode
name: MetaProvides::Package/AUTOVIV/:InstallModulesPM
- version: '6.020'
+ version: '6.024'
zilla:
class: Dist::Zilla::Dist::Builder
config:
is_trial: '0'
- version: '6.020'
+ version: '6.024'
x_contributors:
- 'Adam Kennedy <[email protected]>'
- 'Adam Sjogren <[email protected]>'
@@ -785,6 +785,7 @@
- 'Shoichi Kaji <[email protected]>'
- 'simbabque <[email protected]>'
- 'Slaven Rezic <[email protected]>'
+ - 'Slaven Rezic <[email protected]>'
- 'Spiros Denaxas <[email protected]>'
- 'Steffen Ullrich <[email protected]>'
- 'Steve Hay <[email protected]>'
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/libwww-perl-6.55/Makefile.PL
new/libwww-perl-6.56/Makefile.PL
--- old/libwww-perl-6.55/Makefile.PL 2021-06-17 15:57:11.000000000 +0200
+++ new/libwww-perl-6.56/Makefile.PL 2021-08-17 15:57:18.000000000 +0200
@@ -86,7 +86,7 @@
"Test::Needs" => 0,
"Test::RequiresInternet" => 0
},
- "VERSION" => "6.55",
+ "VERSION" => "6.56",
"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.55/lib/LWP/Authen/Basic.pm
new/libwww-perl-6.56/lib/LWP/Authen/Basic.pm
--- old/libwww-perl-6.55/lib/LWP/Authen/Basic.pm 2021-06-17
15:57:12.000000000 +0200
+++ new/libwww-perl-6.56/lib/LWP/Authen/Basic.pm 2021-08-17
15:57:18.000000000 +0200
@@ -2,7 +2,7 @@
use strict;
-our $VERSION = '6.55';
+our $VERSION = '6.56';
require Encode;
require MIME::Base64;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/libwww-perl-6.55/lib/LWP/Authen/Digest.pm
new/libwww-perl-6.56/lib/LWP/Authen/Digest.pm
--- old/libwww-perl-6.55/lib/LWP/Authen/Digest.pm 2021-06-17
15:57:12.000000000 +0200
+++ new/libwww-perl-6.56/lib/LWP/Authen/Digest.pm 2021-08-17
15:57:18.000000000 +0200
@@ -3,7 +3,7 @@
use strict;
use base 'LWP::Authen::Basic';
-our $VERSION = '6.55';
+our $VERSION = '6.56';
require Digest::MD5;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/libwww-perl-6.55/lib/LWP/Authen/Ntlm.pm
new/libwww-perl-6.56/lib/LWP/Authen/Ntlm.pm
--- old/libwww-perl-6.55/lib/LWP/Authen/Ntlm.pm 2021-06-17 15:57:12.000000000
+0200
+++ new/libwww-perl-6.56/lib/LWP/Authen/Ntlm.pm 2021-08-17 15:57:18.000000000
+0200
@@ -2,7 +2,7 @@
use strict;
-our $VERSION = '6.55';
+our $VERSION = '6.56';
use Authen::NTLM "1.02";
use MIME::Base64 "2.12";
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/libwww-perl-6.55/lib/LWP/ConnCache.pm
new/libwww-perl-6.56/lib/LWP/ConnCache.pm
--- old/libwww-perl-6.55/lib/LWP/ConnCache.pm 2021-06-17 15:57:12.000000000
+0200
+++ new/libwww-perl-6.56/lib/LWP/ConnCache.pm 2021-08-17 15:57:18.000000000
+0200
@@ -2,7 +2,7 @@
use strict;
-our $VERSION = '6.55';
+our $VERSION = '6.56';
our $DEBUG;
sub new {
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/libwww-perl-6.55/lib/LWP/Debug/TraceHTTP.pm
new/libwww-perl-6.56/lib/LWP/Debug/TraceHTTP.pm
--- old/libwww-perl-6.55/lib/LWP/Debug/TraceHTTP.pm 2021-06-17
15:57:12.000000000 +0200
+++ new/libwww-perl-6.56/lib/LWP/Debug/TraceHTTP.pm 2021-08-17
15:57:18.000000000 +0200
@@ -11,7 +11,7 @@
use strict;
use base 'LWP::Protocol::http';
-our $VERSION = '6.55';
+our $VERSION = '6.56';
package # hide from PAUSE
LWP::Debug::TraceHTTP::Socket;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/libwww-perl-6.55/lib/LWP/Debug.pm
new/libwww-perl-6.56/lib/LWP/Debug.pm
--- old/libwww-perl-6.55/lib/LWP/Debug.pm 2021-06-17 15:57:12.000000000
+0200
+++ new/libwww-perl-6.56/lib/LWP/Debug.pm 2021-08-17 15:57:18.000000000
+0200
@@ -1,6 +1,6 @@
package LWP::Debug; # legacy
-our $VERSION = '6.55';
+our $VERSION = '6.56';
require Exporter;
our @ISA = qw(Exporter);
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/libwww-perl-6.55/lib/LWP/DebugFile.pm
new/libwww-perl-6.56/lib/LWP/DebugFile.pm
--- old/libwww-perl-6.55/lib/LWP/DebugFile.pm 2021-06-17 15:57:12.000000000
+0200
+++ new/libwww-perl-6.56/lib/LWP/DebugFile.pm 2021-08-17 15:57:18.000000000
+0200
@@ -1,6 +1,6 @@
package LWP::DebugFile;
-our $VERSION = '6.55';
+our $VERSION = '6.56';
# legacy stub
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/libwww-perl-6.55/lib/LWP/MemberMixin.pm
new/libwww-perl-6.56/lib/LWP/MemberMixin.pm
--- old/libwww-perl-6.55/lib/LWP/MemberMixin.pm 2021-06-17 15:57:12.000000000
+0200
+++ new/libwww-perl-6.56/lib/LWP/MemberMixin.pm 2021-08-17 15:57:18.000000000
+0200
@@ -1,6 +1,6 @@
package LWP::MemberMixin;
-our $VERSION = '6.55';
+our $VERSION = '6.56';
sub _elem {
my $self = shift;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/libwww-perl-6.55/lib/LWP/Protocol/cpan.pm
new/libwww-perl-6.56/lib/LWP/Protocol/cpan.pm
--- old/libwww-perl-6.55/lib/LWP/Protocol/cpan.pm 2021-06-17
15:57:12.000000000 +0200
+++ new/libwww-perl-6.56/lib/LWP/Protocol/cpan.pm 2021-08-17
15:57:18.000000000 +0200
@@ -4,7 +4,7 @@
use base qw(LWP::Protocol);
-our $VERSION = '6.55';
+our $VERSION = '6.56';
require URI;
require HTTP::Status;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/libwww-perl-6.55/lib/LWP/Protocol/data.pm
new/libwww-perl-6.56/lib/LWP/Protocol/data.pm
--- old/libwww-perl-6.55/lib/LWP/Protocol/data.pm 2021-06-17
15:57:12.000000000 +0200
+++ new/libwww-perl-6.56/lib/LWP/Protocol/data.pm 2021-08-17
15:57:18.000000000 +0200
@@ -4,7 +4,7 @@
use strict;
-our $VERSION = '6.55';
+our $VERSION = '6.56';
require HTTP::Response;
require HTTP::Status;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/libwww-perl-6.55/lib/LWP/Protocol/file.pm
new/libwww-perl-6.56/lib/LWP/Protocol/file.pm
--- old/libwww-perl-6.55/lib/LWP/Protocol/file.pm 2021-06-17
15:57:12.000000000 +0200
+++ new/libwww-perl-6.56/lib/LWP/Protocol/file.pm 2021-08-17
15:57:18.000000000 +0200
@@ -4,7 +4,7 @@
use strict;
-our $VERSION = '6.55';
+our $VERSION = '6.56';
require LWP::MediaTypes;
require HTTP::Request;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/libwww-perl-6.55/lib/LWP/Protocol/ftp.pm
new/libwww-perl-6.56/lib/LWP/Protocol/ftp.pm
--- old/libwww-perl-6.55/lib/LWP/Protocol/ftp.pm 2021-06-17
15:57:12.000000000 +0200
+++ new/libwww-perl-6.56/lib/LWP/Protocol/ftp.pm 2021-08-17
15:57:18.000000000 +0200
@@ -5,7 +5,7 @@
use base qw(LWP::Protocol);
use strict;
-our $VERSION = '6.55';
+our $VERSION = '6.56';
use Carp ();
use HTTP::Status ();
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/libwww-perl-6.55/lib/LWP/Protocol/gopher.pm
new/libwww-perl-6.56/lib/LWP/Protocol/gopher.pm
--- old/libwww-perl-6.55/lib/LWP/Protocol/gopher.pm 2021-06-17
15:57:12.000000000 +0200
+++ new/libwww-perl-6.56/lib/LWP/Protocol/gopher.pm 2021-08-17
15:57:18.000000000 +0200
@@ -9,7 +9,7 @@
use strict;
-our $VERSION = '6.55';
+our $VERSION = '6.56';
require HTTP::Response;
require HTTP::Status;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/libwww-perl-6.55/lib/LWP/Protocol/http.pm
new/libwww-perl-6.56/lib/LWP/Protocol/http.pm
--- old/libwww-perl-6.55/lib/LWP/Protocol/http.pm 2021-06-17
15:57:12.000000000 +0200
+++ new/libwww-perl-6.56/lib/LWP/Protocol/http.pm 2021-08-17
15:57:18.000000000 +0200
@@ -2,7 +2,7 @@
use strict;
-our $VERSION = '6.55';
+our $VERSION = '6.56';
require HTTP::Response;
require HTTP::Status;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/libwww-perl-6.55/lib/LWP/Protocol/loopback.pm
new/libwww-perl-6.56/lib/LWP/Protocol/loopback.pm
--- old/libwww-perl-6.55/lib/LWP/Protocol/loopback.pm 2021-06-17
15:57:12.000000000 +0200
+++ new/libwww-perl-6.56/lib/LWP/Protocol/loopback.pm 2021-08-17
15:57:18.000000000 +0200
@@ -2,7 +2,7 @@
use strict;
-our $VERSION = '6.55';
+our $VERSION = '6.56';
require HTTP::Response;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/libwww-perl-6.55/lib/LWP/Protocol/mailto.pm
new/libwww-perl-6.56/lib/LWP/Protocol/mailto.pm
--- old/libwww-perl-6.55/lib/LWP/Protocol/mailto.pm 2021-06-17
15:57:12.000000000 +0200
+++ new/libwww-perl-6.56/lib/LWP/Protocol/mailto.pm 2021-08-17
15:57:18.000000000 +0200
@@ -11,7 +11,7 @@
use Carp;
use strict;
-our $VERSION = '6.55';
+our $VERSION = '6.56';
use base qw(LWP::Protocol);
our $SENDMAIL;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/libwww-perl-6.55/lib/LWP/Protocol/nntp.pm
new/libwww-perl-6.56/lib/LWP/Protocol/nntp.pm
--- old/libwww-perl-6.55/lib/LWP/Protocol/nntp.pm 2021-06-17
15:57:12.000000000 +0200
+++ new/libwww-perl-6.56/lib/LWP/Protocol/nntp.pm 2021-08-17
15:57:18.000000000 +0200
@@ -4,7 +4,7 @@
use base qw(LWP::Protocol);
-our $VERSION = '6.55';
+our $VERSION = '6.56';
require HTTP::Response;
require HTTP::Status;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/libwww-perl-6.55/lib/LWP/Protocol/nogo.pm
new/libwww-perl-6.56/lib/LWP/Protocol/nogo.pm
--- old/libwww-perl-6.55/lib/LWP/Protocol/nogo.pm 2021-06-17
15:57:12.000000000 +0200
+++ new/libwww-perl-6.56/lib/LWP/Protocol/nogo.pm 2021-08-17
15:57:18.000000000 +0200
@@ -7,7 +7,7 @@
use strict;
-our $VERSION = '6.55';
+our $VERSION = '6.56';
require HTTP::Response;
require HTTP::Status;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/libwww-perl-6.55/lib/LWP/Protocol.pm
new/libwww-perl-6.56/lib/LWP/Protocol.pm
--- old/libwww-perl-6.55/lib/LWP/Protocol.pm 2021-06-17 15:57:12.000000000
+0200
+++ new/libwww-perl-6.56/lib/LWP/Protocol.pm 2021-08-17 15:57:18.000000000
+0200
@@ -2,7 +2,7 @@
use base 'LWP::MemberMixin';
-our $VERSION = '6.55';
+our $VERSION = '6.56';
use strict;
use Carp ();
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/libwww-perl-6.55/lib/LWP/RobotUA.pm
new/libwww-perl-6.56/lib/LWP/RobotUA.pm
--- old/libwww-perl-6.55/lib/LWP/RobotUA.pm 2021-06-17 15:57:12.000000000
+0200
+++ new/libwww-perl-6.56/lib/LWP/RobotUA.pm 2021-08-17 15:57:18.000000000
+0200
@@ -2,7 +2,7 @@
use base qw(LWP::UserAgent);
-our $VERSION = '6.55';
+our $VERSION = '6.56';
require WWW::RobotRules;
require HTTP::Request;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/libwww-perl-6.55/lib/LWP/Simple.pm
new/libwww-perl-6.56/lib/LWP/Simple.pm
--- old/libwww-perl-6.55/lib/LWP/Simple.pm 2021-06-17 15:57:12.000000000
+0200
+++ new/libwww-perl-6.56/lib/LWP/Simple.pm 2021-08-17 15:57:18.000000000
+0200
@@ -2,7 +2,7 @@
use strict;
-our $VERSION = '6.55';
+our $VERSION = '6.56';
require Exporter;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/libwww-perl-6.55/lib/LWP/UserAgent.pm
new/libwww-perl-6.56/lib/LWP/UserAgent.pm
--- old/libwww-perl-6.55/lib/LWP/UserAgent.pm 2021-06-17 15:57:12.000000000
+0200
+++ new/libwww-perl-6.56/lib/LWP/UserAgent.pm 2021-08-17 15:57:18.000000000
+0200
@@ -16,7 +16,7 @@
use Scalar::Util qw(blessed);
use Try::Tiny qw(try catch);
-our $VERSION = '6.55';
+our $VERSION = '6.56';
sub new
{
@@ -445,38 +445,41 @@
return $self->request( HTTP::Request::Common::GET( @parameters ), @suff );
}
-sub _has_raw_content {
+sub _maybe_copy_default_content_type {
my $self = shift;
- shift; # drop url
+ my $req = shift;
+
+ my $default_ct = $self->default_header('Content-Type');
+ return unless defined $default_ct;
+
+ # drop url
+ shift;
- # taken from HTTP::Request::Common::request_type_with_data
+ # adapted from HTTP::Request::Common::request_type_with_data
my $content;
$content = shift if @_ and ref $_[0];
- my($k, $v);
- while (($k,$v) = splice(@_, 0, 2)) {
+
+ # We only care about the final value, really
+ my $ct;
+
+ my ($k, $v);
+ while (($k, $v) = splice(@_, 0, 2)) {
if (lc($k) eq 'content') {
$content = $v;
}
+ elsif (lc($k) eq 'content-type') {
+ $ct = $v;
+ }
}
- # We were given Content => 'string' ...
- if (defined $content && ! ref ($content)) {
- return 1;
- }
-
- return;
-}
-
-sub _maybe_copy_default_content_type {
- my ($self, $req, @parameters) = @_;
+ # Content-type provided and truthy? skip
+ return if $ct;
- # If we have a default Content-Type and someone passes in a POST/PUT
- # with Content => 'some-string-value', use that Content-Type instead
- # of x-www-form-urlencoded
- my $ct = $self->default_header('Content-Type');
- return unless defined $ct && $self->_has_raw_content(@parameters);
+ # Content is not just a string? Then it must be x-www-form-urlencoded
+ return if defined $content && ref($content);
- $req->header('Content-Type' => $ct);
+ # Provide default
+ $req->header('Content-Type' => $default_ct);
}
sub post {
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/libwww-perl-6.55/lib/LWP.pm
new/libwww-perl-6.56/lib/LWP.pm
--- old/libwww-perl-6.55/lib/LWP.pm 2021-06-17 15:57:11.000000000 +0200
+++ new/libwww-perl-6.56/lib/LWP.pm 2021-08-17 15:57:18.000000000 +0200
@@ -1,6 +1,6 @@
package LWP;
-our $VERSION = '6.55';
+our $VERSION = '6.56';
require LWP::UserAgent; # this should load everything you need
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/libwww-perl-6.55/t/base/default_content_type.t
new/libwww-perl-6.56/t/base/default_content_type.t
--- old/libwww-perl-6.55/t/base/default_content_type.t 2021-06-17
15:57:12.000000000 +0200
+++ new/libwww-perl-6.56/t/base/default_content_type.t 2021-08-17
15:57:18.000000000 +0200
@@ -4,7 +4,7 @@
use LWP::UserAgent;
use HTTP::Request ();
-plan tests => 6;
+plan tests => 18;
# Prevent environment from interfering with test:
delete $ENV{PERL_LWP_SSL_VERIFY_HOSTNAME};
@@ -15,34 +15,38 @@
delete $ENV{PERL_LWP_ENV_PROXY};
# we can only use HTTP::Request >= 6.07
-my $ver = $HTTP::Request::VERSION || '6.00';
-my $ver_ok = eval {HTTP::Request->VERSION("6.07");};
-my $patch_ver_ok = eval {HTTP::Request->VERSION("6.12");};
+my $ver = $HTTP::Request::VERSION || '6.00';
+my $ver_ok = eval { HTTP::Request->VERSION("6.07"); };
+my $patch_ver_ok = eval { HTTP::Request->VERSION("6.12"); };
diag "Some tests for the PUT/PATCH methods can only be run on ";
diag "HTTP::Request version 6.07/6.12 or higher.";
diag "If your version isn't good enough, we'll skip those.";
-diag "Your version is $ver and that's ". ($ver_ok ? '' : 'not '). 'good
enough';
+diag "Your version is $ver and that's "
+ . ($ver_ok ? '' : 'not ')
+ . 'good enough';
# default_header 'Content-Type' should be honored in POST/PUT
# if the "Content => 'string'" form is used. Otherwise, x-www-form-urlencoded
# will be used
my $url = "http://www.example.com";;
-my $ua = LWP::UserAgent->new;
+my $ua = LWP::UserAgent->new;
$ua->default_header('Content-Type' => 'application/json');
$ua->proxy(http => "loopback:");
$ua->agent("foo/0.1");
# These forms will all be x-www-form-urlencoded
subtest 'PATCH x-www-form-urlencoded' => sub {
- plan skip_all => "HTTP::Request version not high enough" unless
$patch_ver_ok;
+ plan skip_all => "HTTP::Request version not high enough"
+ unless $patch_ver_ok;
plan tests => 4;
for my $arg (
- [ { cat => 'dog' } ],
- [ [ cat => 'dog' ] ],
- [ Content => { cat => 'dog' }, ],
- [ Content => [ cat => 'dog' ], ],
- ) {
- is ($ua->patch($url, @$arg)->content, <<"EOT", "patch @$arg");
+ [{cat => 'dog'}],
+ [[cat => 'dog']],
+ [Content => {cat => 'dog'},],
+ [Content => [cat => 'dog'],],
+ )
+ {
+ is($ua->patch($url, @$arg)->content, <<"EOT", "patch @$arg");
PATCH http://www.example.com
User-Agent: foo/0.1
Content-Length: 7
@@ -56,14 +60,15 @@
# These forms will all be x-www-form-urlencoded
subtest 'PUT x-www-form-urlencoded' => sub {
plan skip_all => "HTTP::Request version not high enough" unless $ver_ok;
- plan tests => 4;
+ plan tests => 4;
for my $arg (
- [ { cat => 'dog' } ],
- [ [ cat => 'dog' ] ],
- [ Content => { cat => 'dog' }, ],
- [ Content => [ cat => 'dog' ], ],
- ) {
- is ($ua->put($url, @$arg)->content, <<"EOT", "put @$arg");
+ [{cat => 'dog'}],
+ [[cat => 'dog']],
+ [Content => {cat => 'dog'},],
+ [Content => [cat => 'dog'],],
+ )
+ {
+ is($ua->put($url, @$arg)->content, <<"EOT", "put @$arg");
PUT http://www.example.com
User-Agent: foo/0.1
Content-Length: 7
@@ -78,12 +83,13 @@
subtest 'POST x-www-form-urlencoded' => sub {
plan tests => 4;
for my $arg (
- [ { cat => 'dog' } ],
- [ [ cat => 'dog' ] ],
- [ Content => { cat => 'dog' }, ],
- [ Content => [ cat => 'dog' ], ],
- ) {
- is ($ua->post($url, @$arg)->content, <<"EOT", "post @$arg");
+ [{cat => 'dog'}],
+ [[cat => 'dog']],
+ [Content => {cat => 'dog'},],
+ [Content => [cat => 'dog'],],
+ )
+ {
+ is($ua->post($url, @$arg)->content, <<"EOT", "post @$arg");
POST http://www.example.com
User-Agent: foo/0.1
Content-Length: 7
@@ -98,9 +104,9 @@
for my $call (qw(post put patch)) {
my $ucall = uc $call;
- my $arg = [ Content => '{"cat":"dog"}' ];
+ my $arg = [Content => '{"cat":"dog"}'];
- is ($ua->$call($url, @$arg)->content, <<"EOT", "$call @$arg");
+ is($ua->$call($url, @$arg)->content, <<"EOT", "$call @$arg");
$ucall http://www.example.com
User-Agent: foo/0.1
Content-Length: 13
@@ -110,3 +116,45 @@
EOT
}
+
+# Provided Content-Type overrides default
+for my $call (qw(post put patch)) {
+ my $ucall = uc $call;
+
+ my $arg = ['Content-Type' => 'text/plain', Content => '{"cat":"dog"}'];
+
+ is($ua->$call($url, @$arg)->content,
+ <<"EOT", "$call @$arg with override CT");
+$ucall http://www.example.com
+User-Agent: foo/0.1
+Content-Length: 13
+Content-Type: text/plain
+
+{"cat":"dog"}
+EOT
+
+}
+
+# Any non-true content type means use default
+for my $ct (0, "", undef) {
+ for my $call (qw(post put patch)) {
+ my $ucall = uc $call;
+
+ my $arg = ['Content-Type' => $ct, Content => '{"cat":"dog"}'];
+
+ my $desc = defined($ct) ? $ct : "<undef>";
+
+ my @desc_arg = map { defined $_ ? $_ : "<undef>" } @$arg;
+
+ is($ua->$call($url, @$arg)->content,
+ <<"EOT", "$call @desc_arg with false override CT '$desc' uses
default");
+$ucall http://www.example.com
+User-Agent: foo/0.1
+Content-Length: 13
+Content-Type: application/json
+
+{"cat":"dog"}
+EOT
+ }
+
+}
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/libwww-perl-6.55/t/base/proxy.t
new/libwww-perl-6.56/t/base/proxy.t
--- old/libwww-perl-6.55/t/base/proxy.t 2021-06-17 15:57:12.000000000 +0200
+++ new/libwww-perl-6.56/t/base/proxy.t 2021-08-17 15:57:18.000000000 +0200
@@ -4,7 +4,10 @@
use Test::Fatal;
use LWP::UserAgent;
-plan tests => 2;
+plan tests => 8;
+
+# in case already defined in user's environment
+delete $ENV{$_} for qw(REQUEST_METHOD HTTP_PROXY http_proxy CGI_HTTP_PROXY
NO_PROXY no_proxy);
for my $varname ( qw(ABSURDLY_NAMED_PROXY MY_PROXY) ) {
$ENV{ $varname } = "foobar";
@@ -13,3 +16,70 @@
is(exception{ $ua->env_proxy(); }, undef, "proxy: with env: $varname: no
errors");
delete $ENV{$varname};
}
+
+# simulate CGI environment
+{
+ local $ENV{REQUEST_METHOD} = 'GET';
+ local $ENV{HTTP_PROXY} = 'something';
+ my $ua = LWP::UserAgent->new;
+ $ua->env_proxy();
+ is $ua->proxy('http'), undef, 'HTTP_PROXY ignored in CGI environment';
+}
+
+{
+ local $ENV{REQUEST_METHOD} = 'GET';
+ local $ENV{CGI_HTTP_PROXY} = 'http://proxy.example.org:3128/';
+ my $ua = LWP::UserAgent->new;
+ $ua->env_proxy();
+ is $ua->proxy('http'), 'http://proxy.example.org:3128/',
+ 'substitute CGI_HTTP_PROXY used in CGI environment';
+}
+
+SKIP: {
+ skip "Environment variables are case-sensitive on this platform", 1
+ if do {
+ local $ENV{TEST_CASE_SENSITIVITY} = "a";
+ local $ENV{test_case_sensitivity} = "b";
+ $ENV{TEST_CASE_SENSITIVITY} eq $ENV{test_case_sensitivity};
+ };
+ my @warnings;
+ local $SIG{__WARN__} = sub { push @warnings, @_ };
+ local $ENV{HTTP_PROXY} = 'http://uppercase-proxy.example.org:3128/';
+ local $ENV{http_proxy} = 'http://lowercase-proxy.example.org:3128/';
+ my $ua = LWP::UserAgent->new;
+ $ua->env_proxy();
+ (my $warnings = "@warnings") =~ s{ at .*\n}{};
+ is $warnings, qq{Environment contains multiple differing definitions for
'http_proxy'.\nUsing value from 'HTTP_PROXY'
(http://uppercase-proxy.example.org:3128/) and ignoring 'http_proxy'
(http://lowercase-proxy.example.org:3128/)},
+ 'expected warning on multiple definitions';
+}
+
+{
+ my @warnings;
+ local $SIG{__WARN__} = sub { push @warnings, @_ };
+ local $ENV{HTTP_PROXY} = 'http://proxy.example.org:3128/';
+ local $ENV{http_proxy} = 'http://proxy.example.org:3128/';
+ my $ua = LWP::UserAgent->new;
+ $ua->env_proxy();
+ is_deeply \@warnings, [],
+ "No warnings if multiple definitions for 'http_proxy' exist, but with
the same value";
+}
+
+{
+ local $ENV{NO_PROXY} = 'localhost,example.com';
+ my $ua = LWP::UserAgent->new;
+ $ua->env_proxy();
+ is_deeply $ua->{no_proxy}, [qw(localhost example.com)],
+ 'no_proxy from environment';
+}
+
+{
+ local $TODO = "Test case for GH #372";
+ my @warnings;
+ local $SIG{__WARN__} = sub { push @warnings, @_ };
+ local $ENV{FOO} = 'BAR';
+ local $ENV{foo} = 'bar';
+ my $ua = LWP::UserAgent->new;
+ $ua->env_proxy();
+ is_deeply \@warnings, [],
+ "No warnings for unrelated environment variables";
+}
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/libwww-perl-6.55/xt/release/changes_has_content.t
new/libwww-perl-6.56/xt/release/changes_has_content.t
--- old/libwww-perl-6.55/xt/release/changes_has_content.t 2021-06-17
15:57:12.000000000 +0200
+++ new/libwww-perl-6.56/xt/release/changes_has_content.t 2021-08-17
15:57:18.000000000 +0200
@@ -8,7 +8,7 @@
note 'Checking Changes';
my $changes_file = 'Changes';
-my $newver = '6.55';
+my $newver = '6.56';
my $trial_token = '-TRIAL';
my $encoding = 'UTF-8';
