Hello community, here is the log from the commit of package perl-libwww-perl for openSUSE:Factory checked in at 2013-07-18 17:32:53 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Comparing /work/SRC/openSUSE:Factory/perl-libwww-perl (Old) and /work/SRC/openSUSE:Factory/.perl-libwww-perl.new (New) ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Package is "perl-libwww-perl" Changes: -------- --- /work/SRC/openSUSE:Factory/perl-libwww-perl/perl-libwww-perl.changes 2013-04-17 08:02:52.000000000 +0200 +++ /work/SRC/openSUSE:Factory/.perl-libwww-perl.new/perl-libwww-perl.changes 2013-07-18 17:32:54.000000000 +0200 @@ -1,0 +2,29 @@ +Tue Jul 16 09:42:15 UTC 2013 - co...@suse.com + +- update to 6.05 + Karen Etheridge (3): + Derive message from status code if it was not provided + fix typo in comment + + Ville Skyttä (3): + Spelling fixes. + Spelling fix. + + Gisle Aas (3): + Update repo URL + With Net::HTTP 6.04 we don't need our own can_read() and sysread override + $ENV{HTTP_PROXY} might override our test setup [RT#81381] + + Vyacheslav Matyukhin (1): + fix github url in perldoc + + Slaven Rezic (1): + * Pod is utf-8 + + Peter Rabbitson (1): + Match required perl in Makefile.PL + + Tom Hukins (1): + Fix Github URLs + +------------------------------------------------------------------- Old: ---- libwww-perl-6.04.tar.gz New: ---- libwww-perl-6.05.tar.gz ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Other differences: ------------------ ++++++ perl-libwww-perl.spec ++++++ --- /var/tmp/diff_new_pack.HCiXMA/_old 2013-07-18 17:32:55.000000000 +0200 +++ /var/tmp/diff_new_pack.HCiXMA/_new 2013-07-18 17:32:55.000000000 +0200 @@ -17,7 +17,7 @@ Name: perl-libwww-perl -Version: 6.04 +Version: 6.05 Release: 0 %define cpan_name libwww-perl Summary: The World-Wide-Web library for Perl @@ -43,18 +43,12 @@ BuildRequires: perl(HTTP::Request::Common) >= 6 BuildRequires: perl(HTTP::Response) >= 6 BuildRequires: perl(HTTP::Status) >= 6 -BuildRequires: perl(IO::Select) -BuildRequires: perl(IO::Socket) BuildRequires: perl(LWP::MediaTypes) >= 6 -BuildRequires: perl(MIME::Base64) >= 2.1 -BuildRequires: perl(Net::FTP) >= 2.58 -BuildRequires: perl(Net::HTTP) >= 6 +BuildRequires: perl(Net::HTTP) >= 6.04 BuildRequires: perl(URI) >= 1.10 BuildRequires: perl(URI::Escape) BuildRequires: perl(WWW::RobotRules) >= 6 # -Requires: perl(Digest::MD5) -Requires: perl(Encode) >= 2.12 Requires: perl(Encode::Locale) Requires: perl(File::Listing) >= 6 Requires: perl(HTML::Entities) @@ -67,12 +61,8 @@ Requires: perl(HTTP::Request::Common) >= 6 Requires: perl(HTTP::Response) >= 6 Requires: perl(HTTP::Status) >= 6 -Requires: perl(IO::Select) -Requires: perl(IO::Socket) Requires: perl(LWP::MediaTypes) >= 6 -Requires: perl(MIME::Base64) >= 2.1 -Requires: perl(Net::FTP) >= 2.58 -Requires: perl(Net::HTTP) >= 6 +Requires: perl(Net::HTTP) >= 6.04 Requires: perl(URI) >= 1.10 Requires: perl(URI::Escape) Requires: perl(WWW::RobotRules) >= 6 @@ -80,8 +70,7 @@ Recommends: perl(Authen::NTML) >= 2.12 Recommends: perl(Data::Dump) Recommends: perl(IO::Socket::SSL) >= 1.38 -Recommends: perl(Mozilla::CA) >= 20110101 -Recommends: perl(Net::HTTPS) >= 6 +Recommends: perl(LWP::Protocol::https) >= 6.02 BuildRoot: %{_tmppath}/%{name}-%{version}-build BuildArch: noarch %{perl_requires} @@ -97,24 +86,22 @@ %prep %setup -q -n %{cpan_name}-%{version} %patch0 -p1 +find . -type f -print0 | xargs -0 chmod 644 %build -perl Makefile.PL INSTALLDIRS=vendor -make %{?_smp_mflags} +%{__perl} Makefile.PL INSTALLDIRS=vendor +%{__make} %{?_smp_mflags} %check -make test +%{__make} test %install %perl_make_install %perl_process_packlist %perl_gen_filelist -%clean -rm -rf %{buildroot} - %files -f %{name}.files -%defattr(644,root,root,755) +%defattr(-,root,root,755) %doc AUTHORS Changes README README.SSL talk-to-ourself %attr(755,root,root) %{_bindir}/* ++++++ libwww-perl-6.04.tar.gz -> libwww-perl-6.05.tar.gz ++++++ diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/libwww-perl-6.04/Changes new/libwww-perl-6.05/Changes --- old/libwww-perl-6.04/Changes 2012-02-18 18:21:48.000000000 +0100 +++ new/libwww-perl-6.05/Changes 2013-03-11 22:42:44.000000000 +0100 @@ -1,4 +1,37 @@ _______________________________________________________________________________ +2013-03-11 Release 6.05 + +Karen Etheridge (3): + Derive message from status code if it was not provided + Merge pull request #33 from tomhukins/fix-readme + fix typo in comment + +Ville Skyttä (3): + Spelling fixes. + Spelling fix. + Merge pull request #34 from berekuk/fix-github-path + +Gisle Aas (3): + Update repo URL + With Net::HTTP 6.04 we don't need our own can_read() and sysread override + $ENV{HTTP_PROXY} might override our test setup [RT#81381] + +Vyacheslav Matyukhin (1): + fix github url in perldoc + +Slaven Rezic (1): + * Pod is utf-8 + +Peter Rabbitson (1): + Match required perl in Makefile.PL + +Tom Hukins (1): + Fix Github URLs + + + + +_______________________________________________________________________________ 2012-02-18 Release 6.04 Gisle Aas (4): @@ -298,12 +331,12 @@ _______________________________________________________________________________ 2009-06-25 Release 5.828 -A quick new release to restore compatiblity with perl-5.6. +A quick new release to restore compatibility with perl-5.6. Gisle Aas (4): Less noisy behaviour when we can't download the documents - Restore perl-5.6 compatiblity [RT#47054] + Restore perl-5.6 compatibility [RT#47054] Don't decode US-ASCII and ISO-8859-1 content Some versions of Encode don't support UTF-16-BE [RT#47152] diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/libwww-perl-6.04/META.yml new/libwww-perl-6.05/META.yml --- old/libwww-perl-6.04/META.yml 2012-02-18 23:11:21.000000000 +0100 +++ new/libwww-perl-6.05/META.yml 2013-03-11 22:45:34.000000000 +0100 @@ -1,6 +1,6 @@ --- #YAML:1.0 name: libwww-perl -version: 6.04 +version: 6.05 abstract: The World-Wide Web library for Perl author: - Gisle Aas <gi...@activestate.com> @@ -30,14 +30,14 @@ LWP::MediaTypes: 6 MIME::Base64: 2.1 Net::FTP: 2.58 - Net::HTTP: 6 + Net::HTTP: 6.04 perl: 5.008001 URI: 1.10 URI::Escape: 0 WWW::RobotRules: 6 resources: MailingList: mailto:lib...@perl.org - repository: http://github.com/gisle/libwww-perl + repository: https://github.com/libwww-perl/libwww-perl no_index: directory: - t diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/libwww-perl-6.04/Makefile.PL new/libwww-perl-6.05/Makefile.PL --- old/libwww-perl-6.04/Makefile.PL 2012-02-18 16:04:35.000000000 +0100 +++ new/libwww-perl-6.05/Makefile.PL 2013-01-02 20:47:46.000000000 +0100 @@ -61,7 +61,7 @@ 'LWP::MediaTypes' => 6, 'MIME::Base64' => "2.1", 'Net::FTP' => "2.58", - 'Net::HTTP' => 6, + 'Net::HTTP' => "6.04", 'URI' => "1.10", 'URI::Escape' => 0, 'WWW::RobotRules' => 6, @@ -73,7 +73,7 @@ 'Data::Dump' => 0, }, resources => { - repository => 'http://github.com/gisle/libwww-perl', + repository => 'https://github.com/libwww-perl/libwww-perl', MailingList => 'mailto:lib...@perl.org', } }, diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/libwww-perl-6.04/README new/libwww-perl-6.05/README --- old/libwww-perl-6.04/README 2012-01-14 01:25:46.000000000 +0100 +++ new/libwww-perl-6.05/README 2013-01-02 20:47:46.000000000 +0100 @@ -14,7 +14,7 @@ PREREQUISITES In order to install and use this package you will need Perl version -5.8.8 or better. Some modules within this package depend on other +5.8.1 or better. Some modules within this package depend on other packages that are distributed separately from Perl. We recommend that you have the following packages installed before you install libwww-perl: @@ -82,11 +82,11 @@ If you want to hack on the source it might be a good idea to grab the latest version with git using the command: - git clone git://github.com/gisle/libwww-perl.git lwp + git clone git://github.com/libwww-perl/libwww-perl.git lwp You can also browse the git repository at: - http://github.com/gisle/libwww-perl + https://github.com/libwww-perl/libwww-perl COPYRIGHT diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/libwww-perl-6.04/bin/lwp-mirror new/libwww-perl-6.05/bin/lwp-mirror --- old/libwww-perl-6.04/bin/lwp-mirror 2012-01-14 01:25:46.000000000 +0100 +++ new/libwww-perl-6.05/bin/lwp-mirror 2013-03-11 22:34:19.000000000 +0100 @@ -13,7 +13,7 @@ =head1 DESCRIPTION This program can be used to mirror a document from a WWW server. The -document is only transfered if the remote copy is newer than the local +document is only transferred if the remote copy is newer than the local copy. If the local copy is newer nothing happens. Use the C<-v> option to print the version number of this program. @@ -47,7 +47,7 @@ $progname =~ s,.*/,,; # use basename only $progname =~ s/\.\w*$//; #strip extension if any -$VERSION = "6.00"; +$VERSION = "6.05"; $opt_h = undef; # print usage $opt_v = undef; # print version diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/libwww-perl-6.04/lib/LWP/Protocol/http.pm new/libwww-perl-6.05/lib/LWP/Protocol/http.pm --- old/libwww-perl-6.04/lib/LWP/Protocol/http.pm 2012-02-11 16:02:09.000000000 +0100 +++ new/libwww-perl-6.05/lib/LWP/Protocol/http.pm 2012-11-08 20:56:21.000000000 +0100 @@ -446,43 +446,6 @@ #----------------------------------------------------------- package LWP::Protocol::http::SocketMethods; -sub sysread { - my $self = shift; - if (my $timeout = ${*$self}{io_socket_timeout}) { - die "read timeout" unless $self->can_read($timeout); - } - else { - # since we have made the socket non-blocking we - # use select to wait for some data to arrive - $self->can_read(undef) || die "Assert"; - } - sysread($self, $_[0], $_[1], $_[2] || 0); -} - -sub can_read { - my($self, $timeout) = @_; - my $fbits = ''; - vec($fbits, fileno($self), 1) = 1; - SELECT: - { - my $before; - $before = time if $timeout; - my $nfound = select($fbits, undef, undef, $timeout); - if ($nfound < 0) { - if ($!{EINTR} || $!{EAGAIN}) { - # don't really think EAGAIN can happen here - if ($timeout) { - $timeout -= time - $before; - $timeout = 0 if $timeout < 0; - } - redo SELECT; - } - die "select failed: $!"; - } - return $nfound > 0; - } -} - sub ping { my $self = shift; !$self->can_read(0); diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/libwww-perl-6.04/lib/LWP/UserAgent.pm new/libwww-perl-6.05/lib/LWP/UserAgent.pm --- old/libwww-perl-6.04/lib/LWP/UserAgent.pm 2012-02-18 18:18:12.000000000 +0100 +++ new/libwww-perl-6.05/lib/LWP/UserAgent.pm 2013-03-11 22:34:31.000000000 +0100 @@ -5,7 +5,7 @@ require LWP::MemberMixin; @ISA = qw(LWP::MemberMixin); -$VERSION = "6.04"; +$VERSION = "6.05"; use HTTP::Request (); use HTTP::Response (); @@ -33,12 +33,12 @@ my $local_address = delete $cnf{local_address}; my $ssl_opts = delete $cnf{ssl_opts} || {}; unless (exists $ssl_opts->{verify_hostname}) { - # The processing of HTTPS_CA_* below is for compatiblity with Crypt::SSLeay + # The processing of HTTPS_CA_* below is for compatibility with Crypt::SSLeay if (exists $ENV{PERL_LWP_SSL_VERIFY_HOSTNAME}) { $ssl_opts->{verify_hostname} = $ENV{PERL_LWP_SSL_VERIFY_HOSTNAME}; } elsif ($ENV{HTTPS_CA_FILE} || $ENV{HTTPS_CA_DIR}) { - # Crypt-SSLeay compatiblity (verify peer certificate; but not the hostname) + # Crypt-SSLeay compatibility (verify peer certificate; but not the hostname) $ssl_opts->{verify_hostname} = 0; $ssl_opts->{SSL_verify_mode} = 1; } @@ -852,7 +852,7 @@ } -# depreciated +# deprecated sub use_eval { shift->_elem('use_eval', @_); } sub use_alarm { @@ -1036,6 +1036,7 @@ sub _new_response { my($request, $code, $message, $content) = @_; + $message ||= HTTP::Status::status_message($code); my $response = HTTP::Response->new($code, $message); $response->request($request); $response->header("Client-Date" => HTTP::Date::time2str(time)); @@ -1126,7 +1127,7 @@ is passed in with a TRUE value, then proxy settings are read from environment variables (see env_proxy() method below). If C<env_proxy> isn't provided the C<PERL_LWP_ENV_PROXY> environment variable controls if env_proxy() is called -during initalization. If the C<keep_alive> option is passed in, then a +during initialization. If the C<keep_alive> option is passed in, then a C<LWP::ConnCache> is set up (see conn_cache() method below). The C<keep_alive> value is passed on as the C<total_capacity> for the connection cache. diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/libwww-perl-6.04/lib/LWP.pm new/libwww-perl-6.05/lib/LWP.pm --- old/libwww-perl-6.04/lib/LWP.pm 2012-02-18 18:17:18.000000000 +0100 +++ new/libwww-perl-6.05/lib/LWP.pm 2013-03-11 22:33:18.000000000 +0100 @@ -1,6 +1,6 @@ package LWP; -$VERSION = "6.04"; +$VERSION = "6.05"; sub Version { $VERSION; } require 5.008; @@ -10,6 +10,8 @@ __END__ +=encoding utf-8 + =head1 NAME LWP - The World-Wide Web library for Perl @@ -659,7 +661,7 @@ The latest version of this library is likely to be available from CPAN as well as: - http://github.com/gisle/libwww-perl + http://github.com/libwww-perl/libwww-perl The best place to discuss this code is on the <lib...@perl.org> mailing list. diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/libwww-perl-6.04/t/base/ua.t new/libwww-perl-6.05/t/base/ua.t --- old/libwww-perl-6.04/t/base/ua.t 2012-02-11 16:02:09.000000000 +0100 +++ new/libwww-perl-6.05/t/base/ua.t 2013-01-02 20:47:46.000000000 +0100 @@ -94,6 +94,8 @@ $ua = LWP::UserAgent->new(ssl_opts => { verify_hostname => 1 }); ok($ua->ssl_opts("verify_hostname"), 1); +delete @ENV{grep /_proxy$/i, keys %ENV}; # clean out any proxy vars + $ENV{http_proxy} = "http://example.com"; $ua = LWP::UserAgent->new; ok($ua->proxy('http'), undef); -- To unsubscribe, e-mail: opensuse-commit+unsubscr...@opensuse.org For additional commands, e-mail: opensuse-commit+h...@opensuse.org