Hello community, here is the log from the commit of package perl-libwww-perl for openSUSE:Factory checked in at 2017-11-12 17:56:03 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Comparing /work/SRC/openSUSE:Factory/perl-libwww-perl (Old) and /work/SRC/openSUSE:Factory/.perl-libwww-perl.new (New) ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Package is "perl-libwww-perl" Sun Nov 12 17:56:03 2017 rev:51 rq:539947 version:6.29 Changes: -------- --- /work/SRC/openSUSE:Factory/perl-libwww-perl/perl-libwww-perl.changes 2017-09-25 13:49:20.563874748 +0200 +++ /work/SRC/openSUSE:Factory/.perl-libwww-perl.new/perl-libwww-perl.changes 2017-11-12 17:56:06.746442837 +0100 @@ -1,0 +2,14 @@ +Tue Nov 7 07:18:06 UTC 2017 - co...@suse.com + +- updated to 6.29 + see /usr/share/doc/packages/perl-libwww-perl/Changes + + 6.29 2017-11-06 + - Fix some version numbers + + 6.28 2017-11-06 + - Remove last use of Geopt::Std (Sergey Remanov) (GH #267) + - Include unmatched connect error in status string (Patrik Lundin) (GH #269) + - Fix insecure open FILEHANDLE,EXPR (Takumi Akiyama) (GH #270) + +------------------------------------------------------------------- Old: ---- libwww-perl-6.27.tar.gz New: ---- libwww-perl-6.29.tar.gz ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Other differences: ------------------ ++++++ perl-libwww-perl.spec ++++++ --- /var/tmp/diff_new_pack.XgkJqN/_old 2017-11-12 17:56:07.510415011 +0100 +++ /var/tmp/diff_new_pack.XgkJqN/_new 2017-11-12 17:56:07.514414864 +0100 @@ -17,7 +17,7 @@ Name: perl-libwww-perl -Version: 6.27 +Version: 6.29 Release: 0 %define cpan_name libwww-perl Summary: The World-Wide Web library for Perl ++++++ libwww-perl-6.27.tar.gz -> libwww-perl-6.29.tar.gz ++++++ diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/libwww-perl-6.27/Changes new/libwww-perl-6.29/Changes --- old/libwww-perl-6.27/Changes 2017-09-22 00:28:58.000000000 +0200 +++ new/libwww-perl-6.29/Changes 2017-11-06 21:33:09.000000000 +0100 @@ -1,5 +1,13 @@ Change history for libwww-perl +6.29 2017-11-06 + - Fix some version numbers + +6.28 2017-11-06 + - Remove last use of Geopt::Std (Sergey Remanov) (GH #267) + - Include unmatched connect error in status string (Patrik Lundin) (GH #269) + - Fix insecure open FILEHANDLE,EXPR (Takumi Akiyama) (GH #270) + 6.27 2017-09-21 - Switch to Getopt::Long in lwp-download (GH #262) - Fix lwp-request -C (GH #261) diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/libwww-perl-6.27/META.json new/libwww-perl-6.29/META.json --- old/libwww-perl-6.27/META.json 2017-09-22 00:28:58.000000000 +0200 +++ new/libwww-perl-6.29/META.json 2017-11-06 21:33:09.000000000 +0100 @@ -108,99 +108,99 @@ "provides" : { "LWP" : { "file" : "lib/LWP.pm", - "version" : "6.27" + "version" : "6.29" }, "LWP::Authen::Basic" : { "file" : "lib/LWP/Authen/Basic.pm", - "version" : "6.27" + "version" : "6.29" }, "LWP::Authen::Digest" : { "file" : "lib/LWP/Authen/Digest.pm", - "version" : "6.27" + "version" : "6.29" }, "LWP::Authen::Ntlm" : { "file" : "lib/LWP/Authen/Ntlm.pm", - "version" : "6.27" + "version" : "6.29" }, "LWP::ConnCache" : { "file" : "lib/LWP/ConnCache.pm", - "version" : "6.27" + "version" : "6.29" }, "LWP::Debug" : { "file" : "lib/LWP/Debug.pm", - "version" : "6.27" + "version" : "6.29" }, "LWP::Debug::TraceHTTP" : { "file" : "lib/LWP/Debug/TraceHTTP.pm", - "version" : "6.27" + "version" : "6.29" }, "LWP::DebugFile" : { "file" : "lib/LWP/DebugFile.pm", - "version" : "6.27" + "version" : "6.29" }, "LWP::MemberMixin" : { "file" : "lib/LWP/MemberMixin.pm", - "version" : "6.27" + "version" : "6.29" }, "LWP::Protocol" : { "file" : "lib/LWP/Protocol.pm", - "version" : "6.27" + "version" : "6.29" }, "LWP::Protocol::MyFTP" : { "file" : "lib/LWP/Protocol/ftp.pm", - "version" : "6.27" + "version" : "6.29" }, "LWP::Protocol::cpan" : { "file" : "lib/LWP/Protocol/cpan.pm", - "version" : "6.27" + "version" : "6.29" }, "LWP::Protocol::data" : { "file" : "lib/LWP/Protocol/data.pm", - "version" : "6.27" + "version" : "6.29" }, "LWP::Protocol::file" : { "file" : "lib/LWP/Protocol/file.pm", - "version" : "6.27" + "version" : "6.29" }, "LWP::Protocol::ftp" : { "file" : "lib/LWP/Protocol/ftp.pm", - "version" : "6.27" + "version" : "6.29" }, "LWP::Protocol::gopher" : { "file" : "lib/LWP/Protocol/gopher.pm", - "version" : "6.27" + "version" : "6.29" }, "LWP::Protocol::http" : { "file" : "lib/LWP/Protocol/http.pm", - "version" : "6.27" + "version" : "6.29" }, "LWP::Protocol::loopback" : { "file" : "lib/LWP/Protocol/loopback.pm", - "version" : "6.27" + "version" : "6.29" }, "LWP::Protocol::mailto" : { "file" : "lib/LWP/Protocol/mailto.pm", - "version" : "6.27" + "version" : "6.29" }, "LWP::Protocol::nntp" : { "file" : "lib/LWP/Protocol/nntp.pm", - "version" : "6.27" + "version" : "6.29" }, "LWP::Protocol::nogo" : { "file" : "lib/LWP/Protocol/nogo.pm", - "version" : "6.27" + "version" : "6.29" }, "LWP::RobotUA" : { "file" : "lib/LWP/RobotUA.pm", - "version" : "6.27" + "version" : "6.29" }, "LWP::Simple" : { "file" : "lib/LWP/Simple.pm", - "version" : "6.27" + "version" : "6.29" }, "LWP::UserAgent" : { "file" : "lib/LWP/UserAgent.pm", - "version" : "6.27" + "version" : "6.29" } }, "release_status" : "stable", @@ -217,7 +217,7 @@ "x_IRC" : "irc://irc.perl.org/#lwp", "x_MailingList" : "mailto:lib...@perl.org" }, - "version" : "6.27", + "version" : "6.29", "x_Dist_Zilla" : { "perl" : { "version" : "5.024000" @@ -311,7 +311,7 @@ "branch" : null, "changelog" : "Changes", "signed" : 0, - "tag" : "v6.27", + "tag" : "v6.29", "tag_format" : "v%v", "tag_message" : "v%v" }, @@ -857,6 +857,7 @@ "Nigel Gregoire <nigelgrego...@gmail.com>", "Olaf Alders <o...@wundersolutions.com>", "Ondrej Hanak <ondrej.ha...@ubs.com>", + "Patrik Lundin <patrik.lun...@su.se>", "Peter Rabbitson <ribasu...@cpan.org>", "phrstbrn <phrst...@gmail.com>", "Piotr Roszatycki <piotr.roszaty...@gmail.com>", @@ -865,10 +866,12 @@ "ruff <r...@ukrpost.net>", "sasao <sa...@yugen.org>", "Sean M. Burke <sbu...@cpan.org>", + "Sergey Romanov <sromanov-...@yandex.ru>", "Slaven Rezic <sla...@rezic.de>", "Spiros Denaxas <s.dena...@gmail.com>", "Steffen Ullrich <steffen_ullr...@genua.de>", "Steve Hay <steve...@planit.com>", + "Takumi Akiyama <t.ak...@gmail.com>", "Theodore Robert Campbell Jr <tr...@stupidfoot.com>", "Tim Couzins <tim.couz...@sophos.com>", "Todd Lipcon <t...@amiestreet.com>", diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/libwww-perl-6.27/META.yml new/libwww-perl-6.29/META.yml --- old/libwww-perl-6.27/META.yml 2017-09-22 00:28:58.000000000 +0200 +++ new/libwww-perl-6.29/META.yml 2017-11-06 21:33:09.000000000 +0100 @@ -27,76 +27,76 @@ provides: LWP: file: lib/LWP.pm - version: '6.27' + version: '6.29' LWP::Authen::Basic: file: lib/LWP/Authen/Basic.pm - version: '6.27' + version: '6.29' LWP::Authen::Digest: file: lib/LWP/Authen/Digest.pm - version: '6.27' + version: '6.29' LWP::Authen::Ntlm: file: lib/LWP/Authen/Ntlm.pm - version: '6.27' + version: '6.29' LWP::ConnCache: file: lib/LWP/ConnCache.pm - version: '6.27' + version: '6.29' LWP::Debug: file: lib/LWP/Debug.pm - version: '6.27' + version: '6.29' LWP::Debug::TraceHTTP: file: lib/LWP/Debug/TraceHTTP.pm - version: '6.27' + version: '6.29' LWP::DebugFile: file: lib/LWP/DebugFile.pm - version: '6.27' + version: '6.29' LWP::MemberMixin: file: lib/LWP/MemberMixin.pm - version: '6.27' + version: '6.29' LWP::Protocol: file: lib/LWP/Protocol.pm - version: '6.27' + version: '6.29' LWP::Protocol::MyFTP: file: lib/LWP/Protocol/ftp.pm - version: '6.27' + version: '6.29' LWP::Protocol::cpan: file: lib/LWP/Protocol/cpan.pm - version: '6.27' + version: '6.29' LWP::Protocol::data: file: lib/LWP/Protocol/data.pm - version: '6.27' + version: '6.29' LWP::Protocol::file: file: lib/LWP/Protocol/file.pm - version: '6.27' + version: '6.29' LWP::Protocol::ftp: file: lib/LWP/Protocol/ftp.pm - version: '6.27' + version: '6.29' LWP::Protocol::gopher: file: lib/LWP/Protocol/gopher.pm - version: '6.27' + version: '6.29' LWP::Protocol::http: file: lib/LWP/Protocol/http.pm - version: '6.27' + version: '6.29' LWP::Protocol::loopback: file: lib/LWP/Protocol/loopback.pm - version: '6.27' + version: '6.29' LWP::Protocol::mailto: file: lib/LWP/Protocol/mailto.pm - version: '6.27' + version: '6.29' LWP::Protocol::nntp: file: lib/LWP/Protocol/nntp.pm - version: '6.27' + version: '6.29' LWP::Protocol::nogo: file: lib/LWP/Protocol/nogo.pm - version: '6.27' + version: '6.29' LWP::RobotUA: file: lib/LWP/RobotUA.pm - version: '6.27' + version: '6.29' LWP::Simple: file: lib/LWP/Simple.pm - version: '6.27' + version: '6.29' LWP::UserAgent: file: lib/LWP/UserAgent.pm - version: '6.27' + version: '6.29' requires: Digest::MD5: '0' Encode: '2.12' @@ -133,7 +133,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.27' +version: '6.29' x_Dist_Zilla: perl: version: '5.024000' @@ -208,7 +208,7 @@ branch: ~ changelog: Changes signed: 0 - tag: v6.27 + tag: v6.29 tag_format: v%v tag_message: v%v Dist::Zilla::Role::Git::Repo: @@ -664,6 +664,7 @@ - 'Nigel Gregoire <nigelgrego...@gmail.com>' - 'Olaf Alders <o...@wundersolutions.com>' - 'Ondrej Hanak <ondrej.ha...@ubs.com>' + - 'Patrik Lundin <patrik.lun...@su.se>' - 'Peter Rabbitson <ribasu...@cpan.org>' - 'phrstbrn <phrst...@gmail.com>' - 'Piotr Roszatycki <piotr.roszaty...@gmail.com>' @@ -672,10 +673,12 @@ - 'ruff <r...@ukrpost.net>' - 'sasao <sa...@yugen.org>' - 'Sean M. Burke <sbu...@cpan.org>' + - 'Sergey Romanov <sromanov-...@yandex.ru>' - 'Slaven Rezic <sla...@rezic.de>' - 'Spiros Denaxas <s.dena...@gmail.com>' - 'Steffen Ullrich <steffen_ullr...@genua.de>' - 'Steve Hay <steve...@planit.com>' + - 'Takumi Akiyama <t.ak...@gmail.com>' - 'Theodore Robert Campbell Jr <tr...@stupidfoot.com>' - 'Tim Couzins <tim.couz...@sophos.com>' - 'Todd Lipcon <t...@amiestreet.com>' diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/libwww-perl-6.27/Makefile.PL new/libwww-perl-6.29/Makefile.PL --- old/libwww-perl-6.27/Makefile.PL 2017-09-22 00:28:58.000000000 +0200 +++ new/libwww-perl-6.29/Makefile.PL 2017-11-06 21:33:09.000000000 +0100 @@ -83,7 +83,7 @@ "Test::More" => 0, "Test::RequiresInternet" => 0 }, - "VERSION" => "6.27", + "VERSION" => "6.29", "test" => { "TESTS" => "t/*.t t/base/*.t t/base/protocols/*.t t/local/*.t t/robot/*.t" } diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/libwww-perl-6.27/bin/lwp-mirror new/libwww-perl-6.29/bin/lwp-mirror --- old/libwww-perl-6.27/bin/lwp-mirror 2017-09-22 00:28:58.000000000 +0200 +++ new/libwww-perl-6.29/bin/lwp-mirror 2017-11-06 21:33:09.000000000 +0100 @@ -40,7 +40,7 @@ use strict; use warnings; use LWP::Simple qw(mirror is_success status_message $ua); -use Getopt::Std; +use Getopt::Long qw(GetOptions); use Encode; use Encode::Locale; @@ -49,7 +49,7 @@ $progname =~ s/\.\w*$//; #strip extension if any my %opts; -unless (getopts("hvt:", \%opts)) { +unless (GetOptions(\%opts, 'h', 'v', 't=i')) { usage(); } diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/libwww-perl-6.27/bin/lwp-request new/libwww-perl-6.29/bin/lwp-request --- old/libwww-perl-6.27/bin/lwp-request 2017-09-22 00:28:58.000000000 +0200 +++ new/libwww-perl-6.29/bin/lwp-request 2017-11-06 21:33:09.000000000 +0100 @@ -222,7 +222,7 @@ { package RequestAgent; -$RequestAgent::VERSION = '6.27'; +$RequestAgent::VERSION = '6.29'; use strict; use warnings; use base qw(LWP::UserAgent); diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/libwww-perl-6.27/dist.ini new/libwww-perl-6.29/dist.ini --- old/libwww-perl-6.27/dist.ini 2017-09-22 00:28:58.000000000 +0200 +++ new/libwww-perl-6.29/dist.ini 2017-11-06 21:33:09.000000000 +0100 @@ -4,7 +4,7 @@ copyright_holder = Gisle Aas copyright_year = 1995 -version = 6.27 +version = 6.29 ; Gather stuff in [Git::GatherDir] diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/libwww-perl-6.27/lib/LWP/Authen/Basic.pm new/libwww-perl-6.29/lib/LWP/Authen/Basic.pm --- old/libwww-perl-6.27/lib/LWP/Authen/Basic.pm 2017-09-22 00:28:58.000000000 +0200 +++ new/libwww-perl-6.29/lib/LWP/Authen/Basic.pm 2017-11-06 21:33:09.000000000 +0100 @@ -1,5 +1,5 @@ package LWP::Authen::Basic; -$LWP::Authen::Basic::VERSION = '6.27'; +$LWP::Authen::Basic::VERSION = '6.29'; use strict; require MIME::Base64; diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/libwww-perl-6.27/lib/LWP/Authen/Digest.pm new/libwww-perl-6.29/lib/LWP/Authen/Digest.pm --- old/libwww-perl-6.27/lib/LWP/Authen/Digest.pm 2017-09-22 00:28:58.000000000 +0200 +++ new/libwww-perl-6.29/lib/LWP/Authen/Digest.pm 2017-11-06 21:33:09.000000000 +0100 @@ -1,5 +1,5 @@ package LWP::Authen::Digest; -$LWP::Authen::Digest::VERSION = '6.27'; +$LWP::Authen::Digest::VERSION = '6.29'; use strict; use base 'LWP::Authen::Basic'; diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/libwww-perl-6.27/lib/LWP/Authen/Ntlm.pm new/libwww-perl-6.29/lib/LWP/Authen/Ntlm.pm --- old/libwww-perl-6.27/lib/LWP/Authen/Ntlm.pm 2017-09-22 00:28:58.000000000 +0200 +++ new/libwww-perl-6.29/lib/LWP/Authen/Ntlm.pm 2017-11-06 21:33:09.000000000 +0100 @@ -2,7 +2,7 @@ use strict; -our $VERSION = '6.27'; +our $VERSION = '6.29'; use Authen::NTLM "1.02"; use MIME::Base64 "2.12"; diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/libwww-perl-6.27/lib/LWP/ConnCache.pm new/libwww-perl-6.29/lib/LWP/ConnCache.pm --- old/libwww-perl-6.27/lib/LWP/ConnCache.pm 2017-09-22 00:28:58.000000000 +0200 +++ new/libwww-perl-6.29/lib/LWP/ConnCache.pm 2017-11-06 21:33:09.000000000 +0100 @@ -2,7 +2,7 @@ use strict; -our $VERSION = '6.27'; +our $VERSION = '6.29'; our $DEBUG; sub new { diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/libwww-perl-6.27/lib/LWP/Debug/TraceHTTP.pm new/libwww-perl-6.29/lib/LWP/Debug/TraceHTTP.pm --- old/libwww-perl-6.27/lib/LWP/Debug/TraceHTTP.pm 2017-09-22 00:28:58.000000000 +0200 +++ new/libwww-perl-6.29/lib/LWP/Debug/TraceHTTP.pm 2017-11-06 21:33:09.000000000 +0100 @@ -1,5 +1,5 @@ package LWP::Debug::TraceHTTP; -$LWP::Debug::TraceHTTP::VERSION = '6.27'; +$LWP::Debug::TraceHTTP::VERSION = '6.29'; # Just call: # # require LWP::Debug::TraceHTTP; diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/libwww-perl-6.27/lib/LWP/Debug.pm new/libwww-perl-6.29/lib/LWP/Debug.pm --- old/libwww-perl-6.27/lib/LWP/Debug.pm 2017-09-22 00:28:58.000000000 +0200 +++ new/libwww-perl-6.29/lib/LWP/Debug.pm 2017-11-06 21:33:09.000000000 +0100 @@ -1,5 +1,5 @@ package LWP::Debug; # legacy -$LWP::Debug::VERSION = '6.27'; +$LWP::Debug::VERSION = '6.29'; require Exporter; our @ISA = qw(Exporter); our @EXPORT_OK = qw(level trace debug conns); diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/libwww-perl-6.27/lib/LWP/DebugFile.pm new/libwww-perl-6.29/lib/LWP/DebugFile.pm --- old/libwww-perl-6.27/lib/LWP/DebugFile.pm 2017-09-22 00:28:58.000000000 +0200 +++ new/libwww-perl-6.29/lib/LWP/DebugFile.pm 2017-11-06 21:33:09.000000000 +0100 @@ -1,5 +1,5 @@ package LWP::DebugFile; -$LWP::DebugFile::VERSION = '6.27'; +$LWP::DebugFile::VERSION = '6.29'; # legacy stub 1; diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/libwww-perl-6.27/lib/LWP/MemberMixin.pm new/libwww-perl-6.29/lib/LWP/MemberMixin.pm --- old/libwww-perl-6.27/lib/LWP/MemberMixin.pm 2017-09-22 00:28:58.000000000 +0200 +++ new/libwww-perl-6.29/lib/LWP/MemberMixin.pm 2017-11-06 21:33:09.000000000 +0100 @@ -1,5 +1,5 @@ package LWP::MemberMixin; -$LWP::MemberMixin::VERSION = '6.27'; +$LWP::MemberMixin::VERSION = '6.29'; sub _elem { my $self = shift; my $elem = shift; diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/libwww-perl-6.27/lib/LWP/Protocol/cpan.pm new/libwww-perl-6.29/lib/LWP/Protocol/cpan.pm --- old/libwww-perl-6.27/lib/LWP/Protocol/cpan.pm 2017-09-22 00:28:58.000000000 +0200 +++ new/libwww-perl-6.29/lib/LWP/Protocol/cpan.pm 2017-11-06 21:33:09.000000000 +0100 @@ -1,5 +1,5 @@ package LWP::Protocol::cpan; -$LWP::Protocol::cpan::VERSION = '6.27'; +$LWP::Protocol::cpan::VERSION = '6.29'; use strict; use base qw(LWP::Protocol); diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/libwww-perl-6.27/lib/LWP/Protocol/data.pm new/libwww-perl-6.29/lib/LWP/Protocol/data.pm --- old/libwww-perl-6.27/lib/LWP/Protocol/data.pm 2017-09-22 00:28:58.000000000 +0200 +++ new/libwww-perl-6.29/lib/LWP/Protocol/data.pm 2017-11-06 21:33:09.000000000 +0100 @@ -1,5 +1,5 @@ package LWP::Protocol::data; -$LWP::Protocol::data::VERSION = '6.27'; +$LWP::Protocol::data::VERSION = '6.29'; # Implements access to data:-URLs as specified in RFC 2397 use strict; diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/libwww-perl-6.27/lib/LWP/Protocol/file.pm new/libwww-perl-6.29/lib/LWP/Protocol/file.pm --- old/libwww-perl-6.27/lib/LWP/Protocol/file.pm 2017-09-22 00:28:58.000000000 +0200 +++ new/libwww-perl-6.29/lib/LWP/Protocol/file.pm 2017-11-06 21:33:09.000000000 +0100 @@ -1,5 +1,5 @@ package LWP::Protocol::file; -$LWP::Protocol::file::VERSION = '6.27'; +$LWP::Protocol::file::VERSION = '6.29'; use base qw(LWP::Protocol); use strict; @@ -126,17 +126,17 @@ # read the file if ($method ne "HEAD") { - open(F, $path) or return new + open(my $fh, '<', $path) or return new HTTP::Response(HTTP::Status::RC_INTERNAL_SERVER_ERROR, "Cannot read file '$path': $!"); - binmode(F); + binmode($fh); $response = $self->collect($arg, $response, sub { my $content = ""; - my $bytes = sysread(F, $content, $size); + my $bytes = sysread($fh, $content, $size); return \$content if $bytes > 0; return \ ""; }); - close(F); + close($fh); } $response; diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/libwww-perl-6.27/lib/LWP/Protocol/ftp.pm new/libwww-perl-6.29/lib/LWP/Protocol/ftp.pm --- old/libwww-perl-6.27/lib/LWP/Protocol/ftp.pm 2017-09-22 00:28:58.000000000 +0200 +++ new/libwww-perl-6.29/lib/LWP/Protocol/ftp.pm 2017-11-06 21:33:09.000000000 +0100 @@ -1,5 +1,5 @@ package LWP::Protocol::ftp; -$LWP::Protocol::ftp::VERSION = '6.27'; +$LWP::Protocol::ftp::VERSION = '6.29'; # Implementation of the ftp protocol (RFC 959). We let the Net::FTP # package do all the dirty work. use base qw(LWP::Protocol); @@ -16,7 +16,7 @@ { package LWP::Protocol::MyFTP; -$LWP::Protocol::MyFTP::VERSION = '6.27'; +$LWP::Protocol::MyFTP::VERSION = '6.29'; use strict; use base qw(Net::FTP); diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/libwww-perl-6.27/lib/LWP/Protocol/gopher.pm new/libwww-perl-6.29/lib/LWP/Protocol/gopher.pm --- old/libwww-perl-6.27/lib/LWP/Protocol/gopher.pm 2017-09-22 00:28:58.000000000 +0200 +++ new/libwww-perl-6.29/lib/LWP/Protocol/gopher.pm 2017-11-06 21:33:09.000000000 +0100 @@ -1,5 +1,5 @@ package LWP::Protocol::gopher; -$LWP::Protocol::gopher::VERSION = '6.27'; +$LWP::Protocol::gopher::VERSION = '6.29'; # Implementation of the gopher protocol (RFC 1436) # # This code is based on 'wwwgopher.pl,v 0.10 1994/10/17 18:12:34 shelden' diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/libwww-perl-6.27/lib/LWP/Protocol/http.pm new/libwww-perl-6.29/lib/LWP/Protocol/http.pm --- old/libwww-perl-6.27/lib/LWP/Protocol/http.pm 2017-09-22 00:28:58.000000000 +0200 +++ new/libwww-perl-6.29/lib/LWP/Protocol/http.pm 2017-11-06 21:33:09.000000000 +0100 @@ -1,5 +1,5 @@ package LWP::Protocol::http; -$LWP::Protocol::http::VERSION = '6.27'; +$LWP::Protocol::http::VERSION = '6.29'; use strict; require HTTP::Response; @@ -42,6 +42,8 @@ $@ =~ /\b(Crypt-SSLeay can't verify hostnames)\b/ ) { $status .= " ($1)"; + } elsif ($@) { + $status .= " ($@)"; } die "$status\n\n$@"; } diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/libwww-perl-6.27/lib/LWP/Protocol/loopback.pm new/libwww-perl-6.29/lib/LWP/Protocol/loopback.pm --- old/libwww-perl-6.27/lib/LWP/Protocol/loopback.pm 2017-09-22 00:28:58.000000000 +0200 +++ new/libwww-perl-6.29/lib/LWP/Protocol/loopback.pm 2017-11-06 21:33:09.000000000 +0100 @@ -1,5 +1,5 @@ package LWP::Protocol::loopback; -$LWP::Protocol::loopback::VERSION = '6.27'; +$LWP::Protocol::loopback::VERSION = '6.29'; use strict; require HTTP::Response; diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/libwww-perl-6.27/lib/LWP/Protocol/mailto.pm new/libwww-perl-6.29/lib/LWP/Protocol/mailto.pm --- old/libwww-perl-6.27/lib/LWP/Protocol/mailto.pm 2017-09-22 00:28:58.000000000 +0200 +++ new/libwww-perl-6.29/lib/LWP/Protocol/mailto.pm 2017-11-06 21:33:09.000000000 +0100 @@ -1,5 +1,5 @@ package LWP::Protocol::mailto; -$LWP::Protocol::mailto::VERSION = '6.27'; +$LWP::Protocol::mailto::VERSION = '6.29'; # This module implements the mailto protocol. It is just a simple # frontend to the Unix sendmail program except on MacOS, where it uses # Mail::Internet. diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/libwww-perl-6.27/lib/LWP/Protocol/nntp.pm new/libwww-perl-6.29/lib/LWP/Protocol/nntp.pm --- old/libwww-perl-6.27/lib/LWP/Protocol/nntp.pm 2017-09-22 00:28:58.000000000 +0200 +++ new/libwww-perl-6.29/lib/LWP/Protocol/nntp.pm 2017-11-06 21:33:09.000000000 +0100 @@ -1,5 +1,5 @@ package LWP::Protocol::nntp; -$LWP::Protocol::nntp::VERSION = '6.27'; +$LWP::Protocol::nntp::VERSION = '6.29'; # Implementation of the Network News Transfer Protocol (RFC 977) use base qw(LWP::Protocol); diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/libwww-perl-6.27/lib/LWP/Protocol/nogo.pm new/libwww-perl-6.29/lib/LWP/Protocol/nogo.pm --- old/libwww-perl-6.27/lib/LWP/Protocol/nogo.pm 2017-09-22 00:28:58.000000000 +0200 +++ new/libwww-perl-6.29/lib/LWP/Protocol/nogo.pm 2017-11-06 21:33:09.000000000 +0100 @@ -4,7 +4,7 @@ # LWP::Protocol::implementor(that_scheme, 'LWP::Protocol::nogo'); # For then on, attempts to access URLs with that scheme will generate # a 500 error. -$LWP::Protocol::nogo::VERSION = '6.27'; +$LWP::Protocol::nogo::VERSION = '6.29'; use strict; require HTTP::Response; diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/libwww-perl-6.27/lib/LWP/Protocol.pm new/libwww-perl-6.29/lib/LWP/Protocol.pm --- old/libwww-perl-6.27/lib/LWP/Protocol.pm 2017-09-22 00:28:58.000000000 +0200 +++ new/libwww-perl-6.29/lib/LWP/Protocol.pm 2017-11-06 21:33:09.000000000 +0100 @@ -2,7 +2,7 @@ use base 'LWP::MemberMixin'; -our $VERSION = '6.27'; +our $VERSION = '6.29'; use strict; use Carp (); diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/libwww-perl-6.27/lib/LWP/RobotUA.pm new/libwww-perl-6.29/lib/LWP/RobotUA.pm --- old/libwww-perl-6.27/lib/LWP/RobotUA.pm 2017-09-22 00:28:58.000000000 +0200 +++ new/libwww-perl-6.29/lib/LWP/RobotUA.pm 2017-11-06 21:33:09.000000000 +0100 @@ -2,7 +2,7 @@ use base qw(LWP::UserAgent); -our $VERSION = '6.27'; +our $VERSION = '6.29'; require WWW::RobotRules; require HTTP::Request; diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/libwww-perl-6.27/lib/LWP/Simple.pm new/libwww-perl-6.29/lib/LWP/Simple.pm --- old/libwww-perl-6.27/lib/LWP/Simple.pm 2017-09-22 00:28:58.000000000 +0200 +++ new/libwww-perl-6.29/lib/LWP/Simple.pm 2017-11-06 21:33:09.000000000 +0100 @@ -2,7 +2,7 @@ use strict; -our $VERSION = '6.27'; +our $VERSION = '6.29'; require Exporter; diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/libwww-perl-6.27/lib/LWP/UserAgent.pm new/libwww-perl-6.29/lib/LWP/UserAgent.pm --- old/libwww-perl-6.27/lib/LWP/UserAgent.pm 2017-09-22 00:28:58.000000000 +0200 +++ new/libwww-perl-6.29/lib/LWP/UserAgent.pm 2017-11-06 21:33:09.000000000 +0100 @@ -15,7 +15,7 @@ use Scalar::Util qw(blessed); use Try::Tiny qw(try catch); -our $VERSION = '6.27'; +our $VERSION = '6.29'; sub new { diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/libwww-perl-6.27/lib/LWP.pm new/libwww-perl-6.29/lib/LWP.pm --- old/libwww-perl-6.27/lib/LWP.pm 2017-09-22 00:28:58.000000000 +0200 +++ new/libwww-perl-6.29/lib/LWP.pm 2017-11-06 21:33:09.000000000 +0100 @@ -1,6 +1,6 @@ package LWP; -our $VERSION = '6.27'; +our $VERSION = '6.29'; require LWP::UserAgent; # this should load everything you need diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/libwww-perl-6.27/xt/author/pod-coverage.t new/libwww-perl-6.29/xt/author/pod-coverage.t --- old/libwww-perl-6.27/xt/author/pod-coverage.t 2017-09-22 00:28:58.000000000 +0200 +++ new/libwww-perl-6.29/xt/author/pod-coverage.t 2017-11-06 21:33:09.000000000 +0100 @@ -26,21 +26,21 @@ plan tests => scalar @modules; my %trustme = ( - 'LWP::UserAgent' => [ - qr/^(?:run_handlers|send_request|use_alarm|use_eval)$/ - ], - 'LWP::Protocol' => [ - qr/^(?:max_size|timeout)$/ - ], 'LWP::Protocol::http' => [ qr/^(?:hlist_remove|socket_class|socket_type)$/ ], + 'LWP::Protocol' => [ + qr/^(?:max_size|timeout)$/ + ], 'LWP::RobotUA' => [ qr/^host_count$/ ], 'LWP::Protocol::gopher' => [ qr/^(?:gopher2url|menu2html)$/ - ] + ], + 'LWP::UserAgent' => [ + qr/^(?:run_handlers|send_request|use_alarm|use_eval)$/ + ] ); my @also_private; diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/libwww-perl-6.27/xt/author/pod-spell.t new/libwww-perl-6.29/xt/author/pod-spell.t --- old/libwww-perl-6.27/xt/author/pod-spell.t 2017-09-22 00:28:58.000000000 +0200 +++ new/libwww-perl-6.29/xt/author/pod-spell.t 2017-11-06 21:33:09.000000000 +0100 @@ -13,6 +13,7 @@ Aas Accomazzi Adam +Akiyama Alders Alex Alexandre @@ -131,6 +132,7 @@ Lindley Lipcon Lotterer +Lundin Lutz MacEachern Macdonald @@ -171,6 +173,7 @@ Oosten Oschwald Panchenko +Patrik Peter Peters Pettit @@ -189,12 +192,14 @@ Robert RobotUA Rolf +Romanov Roszatycki Sarathy Schilli Schinder Schwern Sean +Sergey Shirazi Simple Sjogren @@ -214,6 +219,7 @@ Subbarao TCP Takanori +Takumi Theodore Thoennes Thompson @@ -255,6 +261,7 @@ Zoest adamk afPuUsSedvhx +akiym amir amire80 andreas @@ -322,6 +329,7 @@ ondrej onken oschwald +patrik peterm phrstbrn piotr @@ -335,6 +343,7 @@ shildreth slaven sprout +sromanov talby tech tim diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/libwww-perl-6.27/xt/release/changes_has_content.t new/libwww-perl-6.29/xt/release/changes_has_content.t --- old/libwww-perl-6.27/xt/release/changes_has_content.t 2017-09-22 00:28:58.000000000 +0200 +++ new/libwww-perl-6.29/xt/release/changes_has_content.t 2017-11-06 21:33:09.000000000 +0100 @@ -4,7 +4,7 @@ note 'Checking Changes'; my $changes_file = 'Changes'; -my $newver = '6.27'; +my $newver = '6.29'; my $trial_token = '-TRIAL'; SKIP: {