Hello community, here is the log from the commit of package perl-libwww-perl for openSUSE:Factory checked in at 2018-07-18 22:37:16 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Comparing /work/SRC/openSUSE:Factory/perl-libwww-perl (Old) and /work/SRC/openSUSE:Factory/.perl-libwww-perl.new (New) ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Package is "perl-libwww-perl" Wed Jul 18 22:37:16 2018 rev:57 rq:623029 version:6.35 Changes: -------- --- /work/SRC/openSUSE:Factory/perl-libwww-perl/perl-libwww-perl.changes 2018-06-15 14:34:21.562494029 +0200 +++ /work/SRC/openSUSE:Factory/.perl-libwww-perl.new/perl-libwww-perl.changes 2018-07-18 22:37:17.810270939 +0200 @@ -1,0 +2,10 @@ +Mon Jul 16 06:22:36 UTC 2018 - [email protected] + +- updated to 6.35 + see /usr/share/doc/packages/perl-libwww-perl/Changes + + 6.35 2018-07-16 04:48:54Z + - fix file descriptor leak in LWP::Protocol (introduced in version 6.17) + that occurs for perl versions earlier than 5.18. (GH #296) + +------------------------------------------------------------------- Old: ---- libwww-perl-6.34.tar.gz New: ---- libwww-perl-6.35.tar.gz ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Other differences: ------------------ ++++++ perl-libwww-perl.spec ++++++ --- /var/tmp/diff_new_pack.cjgAz7/_old 2018-07-18 22:37:18.450268819 +0200 +++ /var/tmp/diff_new_pack.cjgAz7/_new 2018-07-18 22:37:18.450268819 +0200 @@ -17,7 +17,7 @@ Name: perl-libwww-perl -Version: 6.34 +Version: 6.35 Release: 0 %define cpan_name libwww-perl Summary: The World-Wide Web library for Perl @@ -47,6 +47,7 @@ BuildRequires: perl(Module::Metadata) BuildRequires: perl(Net::HTTP) >= 6.07 BuildRequires: perl(Test::Fatal) +BuildRequires: perl(Test::Needs) BuildRequires: perl(Test::RequiresInternet) BuildRequires: perl(Try::Tiny) BuildRequires: perl(URI) >= 1.10 ++++++ libwww-perl-6.34.tar.gz -> libwww-perl-6.35.tar.gz ++++++ diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/libwww-perl-6.34/Changes new/libwww-perl-6.35/Changes --- old/libwww-perl-6.34/Changes 2018-06-05 20:49:03.000000000 +0200 +++ new/libwww-perl-6.35/Changes 2018-07-16 06:48:58.000000000 +0200 @@ -1,5 +1,9 @@ Change history for libwww-perl +6.35 2018-07-16 04:48:54Z + - fix file descriptor leak in LWP::Protocol (introduced in version 6.17) + that occurs for perl versions earlier than 5.18. (GH #296) + 6.34 2018-06-05 18:48:59Z - timeout() documentation has more details about the response (thanks, Andrew Grangaard!) diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/libwww-perl-6.34/MANIFEST new/libwww-perl-6.35/MANIFEST --- old/libwww-perl-6.34/MANIFEST 2018-06-05 20:49:03.000000000 +0200 +++ new/libwww-perl-6.35/MANIFEST 2018-07-16 06:48:58.000000000 +0200 @@ -48,6 +48,7 @@ t/base/simple.t t/base/ua.t t/base/ua_handlers.t +t/leak/no_leak.t t/local/autoload-get.t t/local/autoload.t t/local/get.t diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/libwww-perl-6.34/META.json new/libwww-perl-6.35/META.json --- old/libwww-perl-6.34/META.json 2018-06-05 20:49:03.000000000 +0200 +++ new/libwww-perl-6.35/META.json 2018-07-16 06:48:58.000000000 +0200 @@ -39,21 +39,15 @@ "IO::Handle" : "0", "IPC::Open3" : "0", "Pod::Coverage::TrustPod" : "0", - "Test::CPAN::Changes" : "0.4", - "Test::CPAN::Meta" : "0", - "Test::CheckManifest" : "1.29", "Test::EOL" : "0", - "Test::Kwalitee" : "1.22", "Test::MinimumVersion" : "0", "Test::Mojibake" : "0", "Test::More" : "0.94", "Test::Pod" : "1.41", "Test::Pod::Coverage" : "1.08", - "Test::Pod::Spelling::CommonMistakes" : "1.000", "Test::Portability::Files" : "0", "Test::Spelling" : "0.12", - "Test::Version" : "1", - "Try::Tiny" : "0.24" + "Test::Version" : "1" } }, "runtime" : { @@ -90,13 +84,15 @@ }, "suggests" : { "Authen::NTLM" : "1.02", + "Data::Dump" : "1.13", "IO::Socket::INET" : "0", "LWP::Protocol::https" : "6.02" } }, "test" : { "recommends" : { - "CPAN::Meta" : "2.120900" + "CPAN::Meta" : "2.120900", + "Test::LeakTrace" : "0" }, "requires" : { "ExtUtils::MakeMaker" : "0", @@ -104,6 +100,7 @@ "FindBin" : "0", "Test::Fatal" : "0", "Test::More" : "0", + "Test::Needs" : "0", "Test::RequiresInternet" : "0" } } @@ -111,96 +108,96 @@ "provides" : { "LWP" : { "file" : "lib/LWP.pm", - "version" : "6.34" + "version" : "6.35" }, "LWP::Authen::Basic" : { "file" : "lib/LWP/Authen/Basic.pm", - "version" : "6.34" + "version" : "6.35" }, "LWP::Authen::Digest" : { "file" : "lib/LWP/Authen/Digest.pm", - "version" : "6.34" + "version" : "6.35" }, "LWP::Authen::Ntlm" : { "file" : "lib/LWP/Authen/Ntlm.pm", - "version" : "6.34" + "version" : "6.35" }, "LWP::ConnCache" : { "file" : "lib/LWP/ConnCache.pm", - "version" : "6.34" + "version" : "6.35" }, "LWP::Debug" : { "file" : "lib/LWP/Debug.pm", - "version" : "6.34", + "version" : "6.35", "x_deprecated" : 1 }, "LWP::Debug::TraceHTTP" : { "file" : "lib/LWP/Debug/TraceHTTP.pm", - "version" : "6.34" + "version" : "6.35" }, "LWP::DebugFile" : { "file" : "lib/LWP/DebugFile.pm", - "version" : "6.34" + "version" : "6.35" }, "LWP::MemberMixin" : { "file" : "lib/LWP/MemberMixin.pm", - "version" : "6.34" + "version" : "6.35" }, "LWP::Protocol" : { "file" : "lib/LWP/Protocol.pm", - "version" : "6.34" + "version" : "6.35" }, "LWP::Protocol::cpan" : { "file" : "lib/LWP/Protocol/cpan.pm", - "version" : "6.34" + "version" : "6.35" }, "LWP::Protocol::data" : { "file" : "lib/LWP/Protocol/data.pm", - "version" : "6.34" + "version" : "6.35" }, "LWP::Protocol::file" : { "file" : "lib/LWP/Protocol/file.pm", - "version" : "6.34" + "version" : "6.35" }, "LWP::Protocol::ftp" : { "file" : "lib/LWP/Protocol/ftp.pm", - "version" : "6.34" + "version" : "6.35" }, "LWP::Protocol::gopher" : { "file" : "lib/LWP/Protocol/gopher.pm", - "version" : "6.34" + "version" : "6.35" }, "LWP::Protocol::http" : { "file" : "lib/LWP/Protocol/http.pm", - "version" : "6.34" + "version" : "6.35" }, "LWP::Protocol::loopback" : { "file" : "lib/LWP/Protocol/loopback.pm", - "version" : "6.34" + "version" : "6.35" }, "LWP::Protocol::mailto" : { "file" : "lib/LWP/Protocol/mailto.pm", - "version" : "6.34" + "version" : "6.35" }, "LWP::Protocol::nntp" : { "file" : "lib/LWP/Protocol/nntp.pm", - "version" : "6.34" + "version" : "6.35" }, "LWP::Protocol::nogo" : { "file" : "lib/LWP/Protocol/nogo.pm", - "version" : "6.34" + "version" : "6.35" }, "LWP::RobotUA" : { "file" : "lib/LWP/RobotUA.pm", - "version" : "6.34" + "version" : "6.35" }, "LWP::Simple" : { "file" : "lib/LWP/Simple.pm", - "version" : "6.34" + "version" : "6.35" }, "LWP::UserAgent" : { "file" : "lib/LWP/UserAgent.pm", - "version" : "6.34" + "version" : "6.35" } }, "release_status" : "stable", @@ -217,10 +214,10 @@ "x_IRC" : "irc://irc.perl.org/#lwp", "x_MailingList" : "mailto:[email protected]"; }, - "version" : "6.34", + "version" : "6.35", "x_Dist_Zilla" : { "perl" : { - "version" : "5.027011" + "version" : "5.028000" }, "plugins" : [ { @@ -244,7 +241,7 @@ } }, "name" : "Git::GatherDir", - "version" : "2.044" + "version" : "2.045" }, { "class" : "Dist::Zilla::Plugin::MetaConfig", @@ -315,7 +312,7 @@ "class" : "Dist::Zilla::Plugin::Git::Contributors", "config" : { "Dist::Zilla::Plugin::Git::Contributors" : { - "git_version" : "2.17.0", + "git_version" : "2.18.0", "include_authors" : 0, "include_releaser" : 1, "order_by" : "name", @@ -374,12 +371,11 @@ "version" : "6.012" }, "Dist::Zilla::Role::TestRunner" : { - "default_jobs" : 1, "version" : "6.012" } }, "name" : "MakeMaker::Awesome", - "version" : "0.42" + "version" : "0.46" }, { "class" : "Dist::Zilla::Plugin::MojibakeTests", @@ -614,12 +610,12 @@ "changelog" : "Changes" }, "Dist::Zilla::Role::Git::Repo" : { - "git_version" : "2.17.0", + "git_version" : "2.18.0", "repo_root" : "." } }, "name" : "Git::Check", - "version" : "2.044" + "version" : "2.045" }, { "class" : "Dist::Zilla::Plugin::CheckStrictVersion", @@ -744,7 +740,7 @@ "changelog" : "Changes" }, "Dist::Zilla::Role::Git::Repo" : { - "git_version" : "2.17.0", + "git_version" : "2.18.0", "repo_root" : "." }, "Dist::Zilla::Role::Git::StringFormatter" : { @@ -752,7 +748,7 @@ } }, "name" : "@Git::VersionManager/release snapshot", - "version" : "2.044" + "version" : "2.045" }, { "class" : "Dist::Zilla::Plugin::Git::Tag", @@ -761,12 +757,12 @@ "branch" : null, "changelog" : "Changes", "signed" : 0, - "tag" : "v6.34", + "tag" : "v6.35", "tag_format" : "v%v", "tag_message" : "v%v" }, "Dist::Zilla::Role::Git::Repo" : { - "git_version" : "2.17.0", + "git_version" : "2.18.0", "repo_root" : "." }, "Dist::Zilla::Role::Git::StringFormatter" : { @@ -774,7 +770,7 @@ } }, "name" : "@Git::VersionManager/Git::Tag", - "version" : "2.044" + "version" : "2.045" }, { "class" : "Dist::Zilla::Plugin::BumpVersionAfterRelease::Transitional", @@ -816,7 +812,7 @@ "changelog" : "Changes" }, "Dist::Zilla::Role::Git::Repo" : { - "git_version" : "2.17.0", + "git_version" : "2.18.0", "repo_root" : "." }, "Dist::Zilla::Role::Git::StringFormatter" : { @@ -824,7 +820,7 @@ } }, "name" : "@Git::VersionManager/post-release commit", - "version" : "2.044" + "version" : "2.045" }, { "class" : "Dist::Zilla::Plugin::Git::Push", @@ -836,12 +832,12 @@ "remotes_must_exist" : 1 }, "Dist::Zilla::Role::Git::Repo" : { - "git_version" : "2.17.0", + "git_version" : "2.18.0", "repo_root" : "." } }, "name" : "Git::Push", - "version" : "2.044" + "version" : "2.045" }, { "class" : "Dist::Zilla::Plugin::ConfirmRelease", @@ -983,6 +979,7 @@ "sasao <[email protected]>", "Sean M. Burke <[email protected]>", "Sergey Romanov <[email protected]>", + "Shoichi Kaji <[email protected]>", "Slaven Rezic <[email protected]>", "Spiros Denaxas <[email protected]>", "Steffen Ullrich <[email protected]>", @@ -1003,7 +1000,7 @@ "Yury Zavarin <[email protected]>", "Zefram <[email protected]>" ], - "x_generated_by_perl" : "v5.27.11", - "x_serialization_backend" : "Cpanel::JSON::XS version 4.02" + "x_generated_by_perl" : "v5.28.0", + "x_serialization_backend" : "Cpanel::JSON::XS version 4.04" } diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/libwww-perl-6.34/META.yml new/libwww-perl-6.35/META.yml --- old/libwww-perl-6.34/META.yml 2018-06-05 20:49:03.000000000 +0200 +++ new/libwww-perl-6.35/META.yml 2018-07-16 06:48:58.000000000 +0200 @@ -8,6 +8,7 @@ FindBin: '0' Test::Fatal: '0' Test::More: '0' + Test::Needs: '0' Test::RequiresInternet: '0' configure_requires: CPAN::Meta::Requirements: '2.120620' @@ -29,74 +30,74 @@ provides: LWP: file: lib/LWP.pm - version: '6.34' + version: '6.35' LWP::Authen::Basic: file: lib/LWP/Authen/Basic.pm - version: '6.34' + version: '6.35' LWP::Authen::Digest: file: lib/LWP/Authen/Digest.pm - version: '6.34' + version: '6.35' LWP::Authen::Ntlm: file: lib/LWP/Authen/Ntlm.pm - version: '6.34' + version: '6.35' LWP::ConnCache: file: lib/LWP/ConnCache.pm - version: '6.34' + version: '6.35' LWP::Debug: file: lib/LWP/Debug.pm - version: '6.34' + version: '6.35' x_deprecated: 1 LWP::Debug::TraceHTTP: file: lib/LWP/Debug/TraceHTTP.pm - version: '6.34' + version: '6.35' LWP::DebugFile: file: lib/LWP/DebugFile.pm - version: '6.34' + version: '6.35' LWP::MemberMixin: file: lib/LWP/MemberMixin.pm - version: '6.34' + version: '6.35' LWP::Protocol: file: lib/LWP/Protocol.pm - version: '6.34' + version: '6.35' LWP::Protocol::cpan: file: lib/LWP/Protocol/cpan.pm - version: '6.34' + version: '6.35' LWP::Protocol::data: file: lib/LWP/Protocol/data.pm - version: '6.34' + version: '6.35' LWP::Protocol::file: file: lib/LWP/Protocol/file.pm - version: '6.34' + version: '6.35' LWP::Protocol::ftp: file: lib/LWP/Protocol/ftp.pm - version: '6.34' + version: '6.35' LWP::Protocol::gopher: file: lib/LWP/Protocol/gopher.pm - version: '6.34' + version: '6.35' LWP::Protocol::http: file: lib/LWP/Protocol/http.pm - version: '6.34' + version: '6.35' LWP::Protocol::loopback: file: lib/LWP/Protocol/loopback.pm - version: '6.34' + version: '6.35' LWP::Protocol::mailto: file: lib/LWP/Protocol/mailto.pm - version: '6.34' + version: '6.35' LWP::Protocol::nntp: file: lib/LWP/Protocol/nntp.pm - version: '6.34' + version: '6.35' LWP::Protocol::nogo: file: lib/LWP/Protocol/nogo.pm - version: '6.34' + version: '6.35' LWP::RobotUA: file: lib/LWP/RobotUA.pm - version: '6.34' + version: '6.35' LWP::Simple: file: lib/LWP/Simple.pm - version: '6.34' + version: '6.35' LWP::UserAgent: file: lib/LWP/UserAgent.pm - version: '6.34' + version: '6.35' requires: Digest::MD5: '0' Encode: '2.12' @@ -133,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.34' +version: '6.35' x_Dist_Zilla: perl: - version: '5.027011' + version: '5.028000' plugins: - class: Dist::Zilla::Plugin::Git::GatherDir @@ -155,7 +156,7 @@ Dist::Zilla::Plugin::Git::GatherDir: include_untracked: 0 name: Git::GatherDir - version: '2.044' + version: '2.045' - class: Dist::Zilla::Plugin::MetaConfig name: MetaConfig @@ -209,7 +210,7 @@ class: Dist::Zilla::Plugin::Git::Contributors config: Dist::Zilla::Plugin::Git::Contributors: - git_version: 2.17.0 + git_version: 2.18.0 include_authors: 0 include_releaser: 1 order_by: name @@ -255,10 +256,9 @@ make_path: make version: '6.012' Dist::Zilla::Role::TestRunner: - default_jobs: 1 version: '6.012' name: MakeMaker::Awesome - version: '0.42' + version: '0.46' - class: Dist::Zilla::Plugin::MojibakeTests name: MojibakeTests @@ -465,10 +465,10 @@ allow_dirty_match: [] changelog: Changes Dist::Zilla::Role::Git::Repo: - git_version: 2.17.0 + git_version: 2.18.0 repo_root: . name: Git::Check - version: '2.044' + version: '2.045' - class: Dist::Zilla::Plugin::CheckStrictVersion name: CheckStrictVersion @@ -562,12 +562,12 @@ allow_dirty_match: [] changelog: Changes Dist::Zilla::Role::Git::Repo: - git_version: 2.17.0 + git_version: 2.18.0 repo_root: . Dist::Zilla::Role::Git::StringFormatter: time_zone: local name: '@Git::VersionManager/release snapshot' - version: '2.044' + version: '2.045' - class: Dist::Zilla::Plugin::Git::Tag config: @@ -575,16 +575,16 @@ branch: ~ changelog: Changes signed: 0 - tag: v6.34 + tag: v6.35 tag_format: v%v tag_message: v%v Dist::Zilla::Role::Git::Repo: - git_version: 2.17.0 + git_version: 2.18.0 repo_root: . Dist::Zilla::Role::Git::StringFormatter: time_zone: local name: '@Git::VersionManager/Git::Tag' - version: '2.044' + version: '2.045' - class: Dist::Zilla::Plugin::BumpVersionAfterRelease::Transitional config: @@ -616,12 +616,12 @@ - (?^:^lib/.*\.pm$) changelog: Changes Dist::Zilla::Role::Git::Repo: - git_version: 2.17.0 + git_version: 2.18.0 repo_root: . Dist::Zilla::Role::Git::StringFormatter: time_zone: local name: '@Git::VersionManager/post-release commit' - version: '2.044' + version: '2.045' - class: Dist::Zilla::Plugin::Git::Push config: @@ -630,10 +630,10 @@ - origin remotes_must_exist: 1 Dist::Zilla::Role::Git::Repo: - git_version: 2.17.0 + git_version: 2.18.0 repo_root: . name: Git::Push - version: '2.044' + version: '2.045' - class: Dist::Zilla::Plugin::ConfirmRelease name: ConfirmRelease @@ -758,6 +758,7 @@ - 'sasao <[email protected]>' - 'Sean M. Burke <[email protected]>' - 'Sergey Romanov <[email protected]>' + - 'Shoichi Kaji <[email protected]>' - 'Slaven Rezic <[email protected]>' - 'Spiros Denaxas <[email protected]>' - 'Steffen Ullrich <[email protected]>' @@ -777,5 +778,5 @@ - 'Yuri Karaban <[email protected]>' - 'Yury Zavarin <[email protected]>' - 'Zefram <[email protected]>' -x_generated_by_perl: v5.27.11 +x_generated_by_perl: v5.28.0 x_serialization_backend: 'YAML::Tiny version 1.73' diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/libwww-perl-6.34/Makefile.PL new/libwww-perl-6.35/Makefile.PL --- old/libwww-perl-6.34/Makefile.PL 2018-06-05 20:49:03.000000000 +0200 +++ new/libwww-perl-6.35/Makefile.PL 2018-07-16 06:48:58.000000000 +0200 @@ -1,5 +1,5 @@ # This Makefile.PL for libwww-perl was generated by -# Dist::Zilla::Plugin::MakeMaker::Awesome 0.42. +# Dist::Zilla::Plugin::MakeMaker::Awesome 0.46. # Don't edit it but the dist.ini and plugins used to construct it. use strict; @@ -83,11 +83,12 @@ "FindBin" => 0, "Test::Fatal" => 0, "Test::More" => 0, + "Test::Needs" => 0, "Test::RequiresInternet" => 0 }, - "VERSION" => "6.34", + "VERSION" => "6.35", "test" => { - "TESTS" => "t/*.t t/base/*.t t/base/protocols/*.t t/local/*.t t/robot/*.t" + "TESTS" => "t/*.t t/base/*.t t/base/protocols/*.t t/leak/*.t t/local/*.t t/robot/*.t" } ); @@ -123,6 +124,7 @@ "Scalar::Util" => 0, "Test::Fatal" => 0, "Test::More" => 0, + "Test::Needs" => 0, "Test::RequiresInternet" => 0, "Try::Tiny" => 0, "URI" => "1.10", @@ -136,7 +138,7 @@ # inserted by Dist::Zilla::Plugin::DynamicPrereqs 0.034 requires('HTTP::Status', '6.18') if has_module('HTTP::Status', '6.17'); -unless ( eval { ExtUtils::MakeMaker->VERSION(6.63_03) } ) { +unless ( eval { ExtUtils::MakeMaker->VERSION('6.63_03') } ) { delete $WriteMakefileArgs{TEST_REQUIRES}; delete $WriteMakefileArgs{BUILD_REQUIRES}; $WriteMakefileArgs{PREREQ_PM} = \%FallbackPrereqs; diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/libwww-perl-6.34/cpanfile new/libwww-perl-6.35/cpanfile --- old/libwww-perl-6.34/cpanfile 2018-06-05 20:49:03.000000000 +0200 +++ new/libwww-perl-6.35/cpanfile 2018-07-16 06:48:58.000000000 +0200 @@ -37,6 +37,7 @@ suggests 'Authen::NTLM' => '1.02'; suggests 'IO::Socket::INET'; suggests 'LWP::Protocol::https' => '6.02'; + suggests 'Data::Dump' => '1.13'; }; on 'test' => sub { @@ -44,14 +45,10 @@ requires 'Test::More'; requires 'Test::RequiresInternet'; requires 'FindBin'; + requires 'Test::Needs'; + recommends 'Test::LeakTrace'; }; on 'develop' => sub { - requires 'Test::CheckManifest' => '1.29'; - requires 'Test::CPAN::Changes' => '0.4'; - requires 'Test::CPAN::Meta'; - requires 'Test::Kwalitee' => '1.22'; - requires 'Test::Pod::Spelling::CommonMistakes' => '1.000'; - requires 'Try::Tiny' => '0.24'; requires 'Authen::NTLM' => '1.02'; }; diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/libwww-perl-6.34/lib/LWP/Authen/Basic.pm new/libwww-perl-6.35/lib/LWP/Authen/Basic.pm --- old/libwww-perl-6.34/lib/LWP/Authen/Basic.pm 2018-06-05 20:49:03.000000000 +0200 +++ new/libwww-perl-6.35/lib/LWP/Authen/Basic.pm 2018-07-16 06:48:58.000000000 +0200 @@ -2,7 +2,7 @@ use strict; -our $VERSION = '6.34'; +our $VERSION = '6.35'; require MIME::Base64; diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/libwww-perl-6.34/lib/LWP/Authen/Digest.pm new/libwww-perl-6.35/lib/LWP/Authen/Digest.pm --- old/libwww-perl-6.34/lib/LWP/Authen/Digest.pm 2018-06-05 20:49:03.000000000 +0200 +++ new/libwww-perl-6.35/lib/LWP/Authen/Digest.pm 2018-07-16 06:48:58.000000000 +0200 @@ -3,7 +3,7 @@ use strict; use base 'LWP::Authen::Basic'; -our $VERSION = '6.34'; +our $VERSION = '6.35'; require Digest::MD5; diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/libwww-perl-6.34/lib/LWP/Authen/Ntlm.pm new/libwww-perl-6.35/lib/LWP/Authen/Ntlm.pm --- old/libwww-perl-6.34/lib/LWP/Authen/Ntlm.pm 2018-06-05 20:49:03.000000000 +0200 +++ new/libwww-perl-6.35/lib/LWP/Authen/Ntlm.pm 2018-07-16 06:48:58.000000000 +0200 @@ -2,7 +2,7 @@ use strict; -our $VERSION = '6.34'; +our $VERSION = '6.35'; use Authen::NTLM "1.02"; use MIME::Base64 "2.12"; diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/libwww-perl-6.34/lib/LWP/ConnCache.pm new/libwww-perl-6.35/lib/LWP/ConnCache.pm --- old/libwww-perl-6.34/lib/LWP/ConnCache.pm 2018-06-05 20:49:03.000000000 +0200 +++ new/libwww-perl-6.35/lib/LWP/ConnCache.pm 2018-07-16 06:48:58.000000000 +0200 @@ -2,7 +2,7 @@ use strict; -our $VERSION = '6.34'; +our $VERSION = '6.35'; our $DEBUG; sub new { diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/libwww-perl-6.34/lib/LWP/Debug/TraceHTTP.pm new/libwww-perl-6.35/lib/LWP/Debug/TraceHTTP.pm --- old/libwww-perl-6.34/lib/LWP/Debug/TraceHTTP.pm 2018-06-05 20:49:03.000000000 +0200 +++ new/libwww-perl-6.35/lib/LWP/Debug/TraceHTTP.pm 2018-07-16 06:48:58.000000000 +0200 @@ -11,7 +11,7 @@ use strict; use base 'LWP::Protocol::http'; -our $VERSION = '6.34'; +our $VERSION = '6.35'; package # hide from PAUSE LWP::Debug::TraceHTTP::Socket; diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/libwww-perl-6.34/lib/LWP/Debug.pm new/libwww-perl-6.35/lib/LWP/Debug.pm --- old/libwww-perl-6.34/lib/LWP/Debug.pm 2018-06-05 20:49:03.000000000 +0200 +++ new/libwww-perl-6.35/lib/LWP/Debug.pm 2018-07-16 06:48:58.000000000 +0200 @@ -1,6 +1,6 @@ package LWP::Debug; # legacy -our $VERSION = '6.34'; +our $VERSION = '6.35'; require Exporter; our @ISA = qw(Exporter); diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/libwww-perl-6.34/lib/LWP/DebugFile.pm new/libwww-perl-6.35/lib/LWP/DebugFile.pm --- old/libwww-perl-6.34/lib/LWP/DebugFile.pm 2018-06-05 20:49:03.000000000 +0200 +++ new/libwww-perl-6.35/lib/LWP/DebugFile.pm 2018-07-16 06:48:58.000000000 +0200 @@ -1,6 +1,6 @@ package LWP::DebugFile; -our $VERSION = '6.34'; +our $VERSION = '6.35'; # legacy stub diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/libwww-perl-6.34/lib/LWP/MemberMixin.pm new/libwww-perl-6.35/lib/LWP/MemberMixin.pm --- old/libwww-perl-6.34/lib/LWP/MemberMixin.pm 2018-06-05 20:49:03.000000000 +0200 +++ new/libwww-perl-6.35/lib/LWP/MemberMixin.pm 2018-07-16 06:48:58.000000000 +0200 @@ -1,6 +1,6 @@ package LWP::MemberMixin; -our $VERSION = '6.34'; +our $VERSION = '6.35'; sub _elem { my $self = shift; diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/libwww-perl-6.34/lib/LWP/Protocol/cpan.pm new/libwww-perl-6.35/lib/LWP/Protocol/cpan.pm --- old/libwww-perl-6.34/lib/LWP/Protocol/cpan.pm 2018-06-05 20:49:03.000000000 +0200 +++ new/libwww-perl-6.35/lib/LWP/Protocol/cpan.pm 2018-07-16 06:48:58.000000000 +0200 @@ -4,7 +4,7 @@ use base qw(LWP::Protocol); -our $VERSION = '6.34'; +our $VERSION = '6.35'; require URI; require HTTP::Status; diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/libwww-perl-6.34/lib/LWP/Protocol/data.pm new/libwww-perl-6.35/lib/LWP/Protocol/data.pm --- old/libwww-perl-6.34/lib/LWP/Protocol/data.pm 2018-06-05 20:49:03.000000000 +0200 +++ new/libwww-perl-6.35/lib/LWP/Protocol/data.pm 2018-07-16 06:48:58.000000000 +0200 @@ -4,7 +4,7 @@ use strict; -our $VERSION = '6.34'; +our $VERSION = '6.35'; require HTTP::Response; require HTTP::Status; diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/libwww-perl-6.34/lib/LWP/Protocol/file.pm new/libwww-perl-6.35/lib/LWP/Protocol/file.pm --- old/libwww-perl-6.34/lib/LWP/Protocol/file.pm 2018-06-05 20:49:03.000000000 +0200 +++ new/libwww-perl-6.35/lib/LWP/Protocol/file.pm 2018-07-16 06:48:58.000000000 +0200 @@ -4,7 +4,7 @@ use strict; -our $VERSION = '6.34'; +our $VERSION = '6.35'; require LWP::MediaTypes; require HTTP::Request; diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/libwww-perl-6.34/lib/LWP/Protocol/ftp.pm new/libwww-perl-6.35/lib/LWP/Protocol/ftp.pm --- old/libwww-perl-6.34/lib/LWP/Protocol/ftp.pm 2018-06-05 20:49:03.000000000 +0200 +++ new/libwww-perl-6.35/lib/LWP/Protocol/ftp.pm 2018-07-16 06:48:58.000000000 +0200 @@ -5,7 +5,7 @@ use base qw(LWP::Protocol); use strict; -our $VERSION = '6.34'; +our $VERSION = '6.35'; use Carp (); use HTTP::Status (); diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/libwww-perl-6.34/lib/LWP/Protocol/gopher.pm new/libwww-perl-6.35/lib/LWP/Protocol/gopher.pm --- old/libwww-perl-6.34/lib/LWP/Protocol/gopher.pm 2018-06-05 20:49:03.000000000 +0200 +++ new/libwww-perl-6.35/lib/LWP/Protocol/gopher.pm 2018-07-16 06:48:58.000000000 +0200 @@ -9,7 +9,7 @@ use strict; -our $VERSION = '6.34'; +our $VERSION = '6.35'; require HTTP::Response; require HTTP::Status; diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/libwww-perl-6.34/lib/LWP/Protocol/http.pm new/libwww-perl-6.35/lib/LWP/Protocol/http.pm --- old/libwww-perl-6.34/lib/LWP/Protocol/http.pm 2018-06-05 20:49:03.000000000 +0200 +++ new/libwww-perl-6.35/lib/LWP/Protocol/http.pm 2018-07-16 06:48:58.000000000 +0200 @@ -2,7 +2,7 @@ use strict; -our $VERSION = '6.34'; +our $VERSION = '6.35'; require HTTP::Response; require HTTP::Status; diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/libwww-perl-6.34/lib/LWP/Protocol/loopback.pm new/libwww-perl-6.35/lib/LWP/Protocol/loopback.pm --- old/libwww-perl-6.34/lib/LWP/Protocol/loopback.pm 2018-06-05 20:49:03.000000000 +0200 +++ new/libwww-perl-6.35/lib/LWP/Protocol/loopback.pm 2018-07-16 06:48:58.000000000 +0200 @@ -2,7 +2,7 @@ use strict; -our $VERSION = '6.34'; +our $VERSION = '6.35'; require HTTP::Response; diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/libwww-perl-6.34/lib/LWP/Protocol/mailto.pm new/libwww-perl-6.35/lib/LWP/Protocol/mailto.pm --- old/libwww-perl-6.34/lib/LWP/Protocol/mailto.pm 2018-06-05 20:49:03.000000000 +0200 +++ new/libwww-perl-6.35/lib/LWP/Protocol/mailto.pm 2018-07-16 06:48:58.000000000 +0200 @@ -11,7 +11,7 @@ use Carp; use strict; -our $VERSION = '6.34'; +our $VERSION = '6.35'; use base qw(LWP::Protocol); our $SENDMAIL; diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/libwww-perl-6.34/lib/LWP/Protocol/nntp.pm new/libwww-perl-6.35/lib/LWP/Protocol/nntp.pm --- old/libwww-perl-6.34/lib/LWP/Protocol/nntp.pm 2018-06-05 20:49:03.000000000 +0200 +++ new/libwww-perl-6.35/lib/LWP/Protocol/nntp.pm 2018-07-16 06:48:58.000000000 +0200 @@ -4,7 +4,7 @@ use base qw(LWP::Protocol); -our $VERSION = '6.34'; +our $VERSION = '6.35'; require HTTP::Response; require HTTP::Status; diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/libwww-perl-6.34/lib/LWP/Protocol/nogo.pm new/libwww-perl-6.35/lib/LWP/Protocol/nogo.pm --- old/libwww-perl-6.34/lib/LWP/Protocol/nogo.pm 2018-06-05 20:49:03.000000000 +0200 +++ new/libwww-perl-6.35/lib/LWP/Protocol/nogo.pm 2018-07-16 06:48:58.000000000 +0200 @@ -7,7 +7,7 @@ use strict; -our $VERSION = '6.34'; +our $VERSION = '6.35'; require HTTP::Response; require HTTP::Status; diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/libwww-perl-6.34/lib/LWP/Protocol.pm new/libwww-perl-6.35/lib/LWP/Protocol.pm --- old/libwww-perl-6.34/lib/LWP/Protocol.pm 2018-06-05 20:49:03.000000000 +0200 +++ new/libwww-perl-6.35/lib/LWP/Protocol.pm 2018-07-16 06:48:58.000000000 +0200 @@ -2,7 +2,7 @@ use base 'LWP::MemberMixin'; -our $VERSION = '6.34'; +our $VERSION = '6.35'; use strict; use Carp (); @@ -100,73 +100,81 @@ my $content; my($ua, $max_size) = @{$self}{qw(ua max_size)}; - try { + # This can't be moved to Try::Tiny due to the closures within causing + # leaks on any version of Perl prior to 5.18. + # https://perl5.git.perl.org/perl.git/commitdiff/a0d2bbd5c + my $error = do { #catch + local $@; local $\; # protect the print below from surprises - if (!defined($arg) || !$response->is_success) { - $response->{default_add_content} = 1; - } - elsif (!ref($arg) && length($arg)) { - open(my $fh, ">", $arg) or die "Can't write to '$arg': $!"; - binmode($fh); - push(@{$response->{handlers}{response_data}}, { - callback => sub { - print $fh $_[3] or die "Can't write to '$arg': $!"; - 1; - }, - }); - push(@{$response->{handlers}{response_done}}, { - callback => sub { - close($fh) or die "Can't write to '$arg': $!"; - undef($fh); - }, - }); - } - elsif (ref($arg) eq 'CODE') { - push(@{$response->{handlers}{response_data}}, { - callback => sub { - &$arg($_[3], $_[0], $self); - 1; - }, - }); - } - else { - die "Unexpected collect argument '$arg'"; - } + eval { # try + if (!defined($arg) || !$response->is_success) { + $response->{default_add_content} = 1; + } + elsif (!ref($arg) && length($arg)) { + open(my $fh, ">", $arg) or die "Can't write to '$arg': $!"; + binmode($fh); + push(@{$response->{handlers}{response_data}}, { + callback => sub { + print $fh $_[3] or die "Can't write to '$arg': $!"; + 1; + }, + }); + push(@{$response->{handlers}{response_done}}, { + callback => sub { + close($fh) or die "Can't write to '$arg': $!"; + undef($fh); + }, + }); + } + elsif (ref($arg) eq 'CODE') { + push(@{$response->{handlers}{response_data}}, { + callback => sub { + &$arg($_[3], $_[0], $self); + 1; + }, + }); + } + else { + die "Unexpected collect argument '$arg'"; + } - $ua->run_handlers("response_header", $response); + $ua->run_handlers("response_header", $response); - if (delete $response->{default_add_content}) { - push(@{$response->{handlers}{response_data}}, { - callback => sub { - $_[0]->add_content($_[3]); - 1; - }, - }); - } + if (delete $response->{default_add_content}) { + push(@{$response->{handlers}{response_data}}, { + callback => sub { + $_[0]->add_content($_[3]); + 1; + }, + }); + } - my $content_size = 0; - my $length = $response->content_length; - my %skip_h; - - while ($content = &$collector, length $$content) { - for my $h ($ua->handlers("response_data", $response)) { - next if $skip_h{$h}; - unless ($h->{callback}->($response, $ua, $h, $$content)) { - # XXX remove from $response->{handlers}{response_data} if present - $skip_h{$h}++; + my $content_size = 0; + my $length = $response->content_length; + my %skip_h; + + while ($content = &$collector, length $$content) { + for my $h ($ua->handlers("response_data", $response)) { + next if $skip_h{$h}; + unless ($h->{callback}->($response, $ua, $h, $$content)) { + # XXX remove from $response->{handlers}{response_data} if present + $skip_h{$h}++; + } + } + $content_size += length($$content); + $ua->progress(($length ? ($content_size / $length) : "tick"), $response); + if (defined($max_size) && $content_size > $max_size) { + $response->push_header("Client-Aborted", "max_size"); + last; } } - $content_size += length($$content); - $ua->progress(($length ? ($content_size / $length) : "tick"), $response); - if (defined($max_size) && $content_size > $max_size) { - $response->push_header("Client-Aborted", "max_size"); - last; - } - } - } - catch { - my $error = $_; + 1; + }; + $@; + }; + + if ($error) { chomp($error); $response->push_header('X-Died' => $error); $response->push_header("Client-Aborted", "die"); diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/libwww-perl-6.34/lib/LWP/RobotUA.pm new/libwww-perl-6.35/lib/LWP/RobotUA.pm --- old/libwww-perl-6.34/lib/LWP/RobotUA.pm 2018-06-05 20:49:03.000000000 +0200 +++ new/libwww-perl-6.35/lib/LWP/RobotUA.pm 2018-07-16 06:48:58.000000000 +0200 @@ -2,7 +2,7 @@ use base qw(LWP::UserAgent); -our $VERSION = '6.34'; +our $VERSION = '6.35'; require WWW::RobotRules; require HTTP::Request; diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/libwww-perl-6.34/lib/LWP/Simple.pm new/libwww-perl-6.35/lib/LWP/Simple.pm --- old/libwww-perl-6.34/lib/LWP/Simple.pm 2018-06-05 20:49:03.000000000 +0200 +++ new/libwww-perl-6.35/lib/LWP/Simple.pm 2018-07-16 06:48:58.000000000 +0200 @@ -2,7 +2,7 @@ use strict; -our $VERSION = '6.34'; +our $VERSION = '6.35'; require Exporter; diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/libwww-perl-6.34/lib/LWP/UserAgent.pm new/libwww-perl-6.35/lib/LWP/UserAgent.pm --- old/libwww-perl-6.34/lib/LWP/UserAgent.pm 2018-06-05 20:49:03.000000000 +0200 +++ new/libwww-perl-6.35/lib/LWP/UserAgent.pm 2018-07-16 06:48:58.000000000 +0200 @@ -15,7 +15,7 @@ use Scalar::Util qw(blessed); use Try::Tiny qw(try catch); -our $VERSION = '6.34'; +our $VERSION = '6.35'; sub new { diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/libwww-perl-6.34/lib/LWP.pm new/libwww-perl-6.35/lib/LWP.pm --- old/libwww-perl-6.34/lib/LWP.pm 2018-06-05 20:49:03.000000000 +0200 +++ new/libwww-perl-6.35/lib/LWP.pm 2018-07-16 06:48:58.000000000 +0200 @@ -1,6 +1,6 @@ package LWP; -our $VERSION = '6.34'; +our $VERSION = '6.35'; require LWP::UserAgent; # this should load everything you need diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/libwww-perl-6.34/t/00-report-prereqs.dd new/libwww-perl-6.35/t/00-report-prereqs.dd --- old/libwww-perl-6.34/t/00-report-prereqs.dd 2018-06-05 20:49:03.000000000 +0200 +++ new/libwww-perl-6.35/t/00-report-prereqs.dd 2018-07-16 06:48:58.000000000 +0200 @@ -18,21 +18,15 @@ 'IO::Handle' => '0', 'IPC::Open3' => '0', 'Pod::Coverage::TrustPod' => '0', - 'Test::CPAN::Changes' => '0.4', - 'Test::CPAN::Meta' => '0', - 'Test::CheckManifest' => '1.29', 'Test::EOL' => '0', - 'Test::Kwalitee' => '1.22', 'Test::MinimumVersion' => '0', 'Test::Mojibake' => '0', 'Test::More' => '0.94', 'Test::Pod' => '1.41', 'Test::Pod::Coverage' => '1.08', - 'Test::Pod::Spelling::CommonMistakes' => '1.000', 'Test::Portability::Files' => '0', 'Test::Spelling' => '0.12', - 'Test::Version' => '1', - 'Try::Tiny' => '0.24' + 'Test::Version' => '1' } }, 'runtime' => { @@ -69,13 +63,15 @@ }, 'suggests' => { 'Authen::NTLM' => '1.02', + 'Data::Dump' => '1.13', 'IO::Socket::INET' => '0', 'LWP::Protocol::https' => '6.02' } }, 'test' => { 'recommends' => { - 'CPAN::Meta' => '2.120900' + 'CPAN::Meta' => '2.120900', + 'Test::LeakTrace' => '0' }, 'requires' => { 'ExtUtils::MakeMaker' => '0', @@ -83,6 +79,7 @@ 'FindBin' => '0', 'Test::Fatal' => '0', 'Test::More' => '0', + 'Test::Needs' => '0', 'Test::RequiresInternet' => '0' } } diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/libwww-perl-6.34/t/leak/no_leak.t new/libwww-perl-6.35/t/leak/no_leak.t --- old/libwww-perl-6.34/t/leak/no_leak.t 1970-01-01 01:00:00.000000000 +0100 +++ new/libwww-perl-6.35/t/leak/no_leak.t 2018-07-16 06:48:58.000000000 +0200 @@ -0,0 +1,26 @@ +use strict; +use warnings; + +# To ensure "no leak" in real LWP code, we should test it against HTTP servers. +# However, HTTPS is not required here, so let's use an HTTP site neverssl.com. +use Test::RequiresInternet 'neverssl.com' => 80; + +use Test::More; +use Test::Needs 'Test::LeakTrace'; + +use File::Temp (); +use LWP::UserAgent; + +plan skip_all => 'skip leak test in COVERAGE' if $ENV{COVERAGE}; + +my ($tempfh, $tempfile) = File::Temp::tempfile(UNLINK => 0); +close $tempfh; + +Test::LeakTrace::no_leaks_ok(sub { + my $ua = LWP::UserAgent->new; + my $res = $ua->get("http://neverssl.com/";, ':content_file' => $tempfile); +}); + +unlink $tempfile; + +done_testing; diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/libwww-perl-6.34/xt/author/eol.t new/libwww-perl-6.35/xt/author/eol.t --- old/libwww-perl-6.34/xt/author/eol.t 2018-06-05 20:49:03.000000000 +0200 +++ new/libwww-perl-6.35/xt/author/eol.t 2018-07-16 06:48:58.000000000 +0200 @@ -44,6 +44,7 @@ 't/base/simple.t', 't/base/ua.t', 't/base/ua_handlers.t', + 't/leak/no_leak.t', 't/local/autoload-get.t', 't/local/autoload.t', 't/local/get.t', diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/libwww-perl-6.34/xt/author/pod-spell.t new/libwww-perl-6.35/xt/author/pod-spell.t --- old/libwww-perl-6.34/xt/author/pod-spell.t 2018-06-05 20:49:03.000000000 +0200 +++ new/libwww-perl-6.35/xt/author/pod-spell.t 2018-07-16 06:48:58.000000000 +0200 @@ -115,6 +115,7 @@ John Jr KONISHI +Kaji Kaminsky Kapranoff Karaban @@ -214,6 +215,7 @@ Sean Sergey Shirazi +Shoichi Simple Sjogren Skyttä @@ -362,6 +364,7 @@ schwern shaohua shildreth +skaji slaven sprout sromanov diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/libwww-perl-6.34/xt/release/changes_has_content.t new/libwww-perl-6.35/xt/release/changes_has_content.t --- old/libwww-perl-6.34/xt/release/changes_has_content.t 2018-06-05 20:49:03.000000000 +0200 +++ new/libwww-perl-6.35/xt/release/changes_has_content.t 2018-07-16 06:48:58.000000000 +0200 @@ -8,7 +8,7 @@ note 'Checking Changes'; my $changes_file = 'Changes'; -my $newver = '6.34'; +my $newver = '6.35'; my $trial_token = '-TRIAL'; my $encoding = 'UTF-8';
