Script 'mail_helper' called by obssrc Hello community, here is the log from the commit of package perl-URI-Fetch for openSUSE:Factory checked in at 2021-06-02 22:12:11 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Comparing /work/SRC/openSUSE:Factory/perl-URI-Fetch (Old) and /work/SRC/openSUSE:Factory/.perl-URI-Fetch.new.1898 (New) ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Package is "perl-URI-Fetch" Wed Jun 2 22:12:11 2021 rev:2 rq:896824 version:0.15 Changes: -------- --- /work/SRC/openSUSE:Factory/perl-URI-Fetch/perl-URI-Fetch.changes 2019-05-16 22:05:37.826533595 +0200 +++ /work/SRC/openSUSE:Factory/.perl-URI-Fetch.new.1898/perl-URI-Fetch.changes 2021-06-02 22:12:37.300096506 +0200 @@ -1,0 +2,20 @@ +Fri May 28 03:07:44 UTC 2021 - Tina M??ller <[email protected]> + +- updated to 0.15 + see /usr/share/doc/packages/perl-URI-Fetch/Changes + + 0.15 2021-05-27 NEILB + - Specify min perl as 5.008001 rather than 5.008_001, which was + causing problems with some versions of ExtUtils::MakeMaker. + RT#133491 + + 0.14 2021-05-26 NEILB + - When Benjamin created this, he had a server set up for doing the + tests, but that's gone now. So to stop all the fails, I'm skipping + the live tests for now. Could do with mocking, but this is a stop-gap. + + 0.13_01 2021-05-25 NEILB + - Changed the test suite to use some online HTTP status code test servers. + Let's see how reliable they are. + +------------------------------------------------------------------- Old: ---- URI-Fetch-0.13.tar.gz New: ---- URI-Fetch-0.15.tar.gz ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Other differences: ------------------ ++++++ perl-URI-Fetch.spec ++++++ --- /var/tmp/diff_new_pack.AuWhIU/_old 2021-06-02 22:12:37.660095616 +0200 +++ /var/tmp/diff_new_pack.AuWhIU/_new 2021-06-02 22:12:37.664095606 +0200 @@ -1,7 +1,7 @@ # # spec file for package perl-URI-Fetch # -# Copyright (c) 2016 SUSE LINUX GmbH, Nuernberg, Germany. +# Copyright (c) 2021 SUSE LLC # # All modifications and additions to the file contributed by third parties # remain the property of their copyright owners, unless otherwise agreed @@ -12,22 +12,20 @@ # license that conforms to the Open Source Definition (Version 1.9) # published by the Open Source Initiative. -# Please submit bugfixes or comments via http://bugs.opensuse.org/ +# Please submit bugfixes or comments via https://bugs.opensuse.org/ # +%define cpan_name URI-Fetch Name: perl-URI-Fetch -Version: 0.13 +Version: 0.15 Release: 0 -%define cpan_name URI-Fetch Summary: Smart URI fetching/caching -License: Artistic-1.0 or GPL-1.0+ -Group: Development/Libraries/Perl -Url: http://search.cpan.org/dist/URI-Fetch/ -Source0: http://www.cpan.org/authors/id/N/NE/NEILB/%{cpan_name}-%{version}.tar.gz +License: Artistic-1.0 OR GPL-1.0-or-later +URL: https://metacpan.org/release/%{cpan_name} +Source0: https://cpan.metacpan.org/authors/id/N/NE/NEILB/%{cpan_name}-%{version}.tar.gz Source1: cpanspec.yml BuildArch: noarch -BuildRoot: %{_tmppath}/%{name}-%{version}-build BuildRequires: perl BuildRequires: perl-macros BuildRequires: perl(Class::ErrorHandler) @@ -86,14 +84,14 @@ should stop trying to fetch it. %prep -%setup -q -n %{cpan_name}-%{version} +%autosetup -n %{cpan_name}-%{version} %build -%{__perl} Makefile.PL INSTALLDIRS=vendor -%{__make} %{?_smp_mflags} +perl Makefile.PL INSTALLDIRS=vendor +%make_build %check -%{__make} test +make test %install %perl_make_install @@ -101,7 +99,7 @@ %perl_gen_filelist %files -f %{name}.files -%defattr(-,root,root,755) -%doc Changes LICENSE README +%doc Changes README +%license LICENSE %changelog ++++++ URI-Fetch-0.13.tar.gz -> URI-Fetch-0.15.tar.gz ++++++ diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/URI-Fetch-0.13/Changes new/URI-Fetch-0.15/Changes --- old/URI-Fetch-0.13/Changes 2016-07-02 10:35:41.000000000 +0200 +++ new/URI-Fetch-0.15/Changes 2021-05-27 18:35:12.000000000 +0200 @@ -1,5 +1,19 @@ Revision history for Perl module URI::Fetch +0.15 2021-05-27 NEILB + - Specify min perl as 5.008001 rather than 5.008_001, which was + causing problems with some versions of ExtUtils::MakeMaker. + RT#133491 + +0.14 2021-05-26 NEILB + - When Benjamin created this, he had a server set up for doing the + tests, but that's gone now. So to stop all the fails, I'm skipping + the live tests for now. Could do with mocking, but this is a stop-gap. + +0.13_01 2021-05-25 NEILB + - Changed the test suite to use some online HTTP status code test servers. + Let's see how reliable they are. + 0.13 2016-07-02 NEILB - Switched to using Test::RequiresInternet rather than the hand-rolled online() function that was duplicated in 2 tests. Plus it was testing diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/URI-Fetch-0.13/MANIFEST new/URI-Fetch-0.15/MANIFEST --- old/URI-Fetch-0.13/MANIFEST 2016-07-02 10:35:41.000000000 +0200 +++ new/URI-Fetch-0.15/MANIFEST 2021-05-27 18:35:12.000000000 +0200 @@ -1,4 +1,4 @@ -# This file was automatically generated by Dist::Zilla::Plugin::Manifest v5.037. +# This file was automatically generated by Dist::Zilla::Plugin::Manifest v6.017. Changes LICENSE MANIFEST diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/URI-Fetch-0.13/META.json new/URI-Fetch-0.15/META.json --- old/URI-Fetch-0.13/META.json 2016-07-02 10:35:41.000000000 +0200 +++ new/URI-Fetch-0.15/META.json 2021-05-27 18:35:12.000000000 +0200 @@ -4,7 +4,7 @@ "Benjamin Trott <[email protected]>" ], "dynamic_config" : 0, - "generated_by" : "Dist::Zilla version 5.037, CPAN::Meta::Converter version 2.150005", + "generated_by" : "Dist::Zilla version 6.017, CPAN::Meta::Converter version 2.150010", "license" : [ "perl_5" ], @@ -19,6 +19,11 @@ "ExtUtils::MakeMaker" : "0" } }, + "develop" : { + "requires" : { + "Test::More" : "0" + } + }, "runtime" : { "requires" : { "Carp" : "0", @@ -28,7 +33,7 @@ "URI" : "0", "base" : "0", "constant" : "0", - "perl" : "5.008_001", + "perl" : "5.008001", "strict" : "0", "warnings" : "0" } @@ -50,6 +55,9 @@ "web" : "https://github.com/neilb/URI-Fetch"; } }, - "version" : "0.13" + "version" : "0.15", + "x_generated_by_perl" : "v5.28.2", + "x_serialization_backend" : "Cpanel::JSON::XS version 4.24", + "x_spdx_expression" : "Artistic-1.0-Perl OR GPL-1.0-or-later" } diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/URI-Fetch-0.13/META.yml new/URI-Fetch-0.15/META.yml --- old/URI-Fetch-0.13/META.yml 2016-07-02 10:35:41.000000000 +0200 +++ new/URI-Fetch-0.15/META.yml 2021-05-27 18:35:12.000000000 +0200 @@ -9,7 +9,7 @@ configure_requires: ExtUtils::MakeMaker: '0' dynamic_config: 0 -generated_by: 'Dist::Zilla version 5.037, CPAN::Meta::Converter version 2.150005' +generated_by: 'Dist::Zilla version 6.017, CPAN::Meta::Converter version 2.150010' license: perl meta-spec: url: http://module-build.sourceforge.net/META-spec-v1.4.html @@ -23,10 +23,13 @@ URI: '0' base: '0' constant: '0' - perl: 5.008_001 + perl: '5.008001' strict: '0' warnings: '0' resources: homepage: https://github.com/neilb/URI-Fetch repository: https://github.com/neilb/URI-Fetch.git -version: '0.13' +version: '0.15' +x_generated_by_perl: v5.28.2 +x_serialization_backend: 'YAML::Tiny version 1.73' +x_spdx_expression: 'Artistic-1.0-Perl OR GPL-1.0-or-later' diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/URI-Fetch-0.13/Makefile.PL new/URI-Fetch-0.15/Makefile.PL --- old/URI-Fetch-0.13/Makefile.PL 2016-07-02 10:35:41.000000000 +0200 +++ new/URI-Fetch-0.15/Makefile.PL 2021-05-27 18:35:12.000000000 +0200 @@ -1,8 +1,8 @@ -# This file was automatically generated by Dist::Zilla::Plugin::MakeMaker v5.037. +# This file was automatically generated by Dist::Zilla::Plugin::MakeMaker v6.017. use strict; use warnings; -use 5.008_001; +use 5.008001; use ExtUtils::MakeMaker; @@ -13,9 +13,8 @@ "ExtUtils::MakeMaker" => 0 }, "DISTNAME" => "URI-Fetch", - "EXE_FILES" => [], "LICENSE" => "perl", - "MIN_PERL_VERSION" => "5.008_001", + "MIN_PERL_VERSION" => "5.008001", "NAME" => "URI::Fetch", "PREREQ_PM" => { "Carp" => 0, @@ -33,7 +32,7 @@ "Test::More" => 0, "Test::RequiresInternet" => "0.05" }, - "VERSION" => "0.13", + "VERSION" => "0.15", "test" => { "TESTS" => "t/*.t" } @@ -44,7 +43,6 @@ "Carp" => 0, "Class::ErrorHandler" => 0, "Data::Dumper" => 0, - "ExtUtils::MakeMaker" => 0, "LWP::UserAgent" => 0, "Storable" => 0, "Test::More" => 0, diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/URI-Fetch-0.13/README new/URI-Fetch-0.15/README --- old/URI-Fetch-0.13/README 2016-07-02 10:35:41.000000000 +0200 +++ new/URI-Fetch-0.15/README 2021-05-27 18:35:12.000000000 +0200 @@ -1,7 +1,5 @@ - - This archive contains the distribution URI-Fetch, -version 0.13: +version 0.15: Smart URI fetching/caching @@ -11,5 +9,4 @@ the same terms as the Perl 5 programming language system itself. -This README file was generated by Dist::Zilla::Plugin::Readme v5.037. - +This README file was generated by Dist::Zilla::Plugin::Readme v6.017. diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/URI-Fetch-0.13/dist.ini new/URI-Fetch-0.15/dist.ini --- old/URI-Fetch-0.13/dist.ini 2016-07-02 10:35:41.000000000 +0200 +++ new/URI-Fetch-0.15/dist.ini 2021-05-27 18:35:12.000000000 +0200 @@ -4,7 +4,7 @@ copyright_holder = Benjamin Trott copyright_year = 2004 -version = 0.13 +version = 0.15 [@Basic] [PkgVersion] diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/URI-Fetch-0.13/lib/URI/Fetch/Response.pm new/URI-Fetch-0.15/lib/URI/Fetch/Response.pm --- old/URI-Fetch-0.13/lib/URI/Fetch/Response.pm 2016-07-02 10:35:41.000000000 +0200 +++ new/URI-Fetch-0.15/lib/URI/Fetch/Response.pm 2021-05-27 18:35:12.000000000 +0200 @@ -1,5 +1,5 @@ package URI::Fetch::Response; -$URI::Fetch::Response::VERSION = '0.13'; +$URI::Fetch::Response::VERSION = '0.15'; use strict; use warnings; diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/URI-Fetch-0.13/lib/URI/Fetch.pm new/URI-Fetch-0.15/lib/URI/Fetch.pm --- old/URI-Fetch-0.13/lib/URI/Fetch.pm 2016-07-02 10:35:41.000000000 +0200 +++ new/URI-Fetch-0.15/lib/URI/Fetch.pm 2021-05-27 18:35:12.000000000 +0200 @@ -1,6 +1,6 @@ package URI::Fetch; -$URI::Fetch::VERSION = '0.13'; -use 5.008_001; +$URI::Fetch::VERSION = '0.15'; +use 5.008001; use strict; use warnings; diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/URI-Fetch-0.13/t/01-fetch.t new/URI-Fetch-0.15/t/01-fetch.t --- old/URI-Fetch-0.13/t/01-fetch.t 2016-07-02 10:35:41.000000000 +0200 +++ new/URI-Fetch-0.15/t/01-fetch.t 2021-05-27 18:35:12.000000000 +0200 @@ -1,15 +1,17 @@ use strict; -use Test::More; -use Test::RequiresInternet 0.05 'stupidfool.org' => 80; +use Test::More skip_all => "these are not the tests you're looking for"; -plan tests => 80; +use Test::RequiresInternet 0.05 'httpstatuses.com' => 443; +use Test::RequiresInternet 0.05 'httpstat.us' => 443; use URI::Fetch; -use constant BASE => 'http://stupidfool.org/perl/feeds/'; -use constant URI_OK => BASE . 'ok.xml'; -use constant URI_MOVED => BASE . 'moved.xml'; -use constant URI_GONE => BASE . 'gone.xml'; +use constant BASE => 'https://httpstatuses.com/'; +# use constant BASE => 'https://httpstat.us/'; +# use constant BASE => 'http://status.savanttools.com/'; +use constant URI_OK => BASE . '200'; +use constant URI_MOVED => BASE . '301'; +use constant URI_GONE => 'https://httpstat.us/410'; use constant URI_ERROR => BASE . 'error.xml'; my($res, $xml, $etag, $mtime); @@ -19,11 +21,12 @@ ok($res); is($res->status, URI::Fetch::URI_OK()); is($res->http_status, 200); -ok($etag = $res->etag); +# ok($etag = $res->etag); ok($mtime = $res->last_modified); is($res->uri, URI_OK); ok($xml = $res->content); + ## Test a fetch using last-modified. $res = URI::Fetch->fetch(URI_OK, LastModified => $mtime); ok($res); @@ -32,28 +35,29 @@ is($res->content, undef); ok(!$res->is_success); + ## Test a fetch using etag. -$res = URI::Fetch->fetch(URI_OK, ETag => $etag); -ok($res); -is($res->http_status, 304); -is($res->status, URI::Fetch::URI_NOT_MODIFIED()); -is($res->content, undef); -ok(!$res->is_success); +# $res = URI::Fetch->fetch(URI_OK, ETag => $etag); +# ok($res); +# is($res->http_status, 304); +# is($res->status, URI::Fetch::URI_NOT_MODIFIED()); +# is($res->content, undef); +# ok(!$res->is_success); ## Test a fetch using both. -$res = URI::Fetch->fetch(URI_OK, ETag => $etag, LastModified => $mtime); -ok($res); -is($res->http_status, 304); -is($res->status, URI::Fetch::URI_NOT_MODIFIED()); -is($res->content, undef); -ok(!$res->is_success); +# $res = URI::Fetch->fetch(URI_OK, ETag => $etag, LastModified => $mtime); +# ok($res); +# is($res->http_status, 304); +# is($res->status, URI::Fetch::URI_NOT_MODIFIED()); +# is($res->content, undef); +# ok(!$res->is_success); ## Test a regular fetch using a cache. my $cache = My::Cache->new; $res = URI::Fetch->fetch(URI_OK, Cache => $cache); ok($res); is($res->http_status, 200); -ok($etag = $res->etag); +# ok($etag = $res->etag); ok($mtime = $res->last_modified); ok($xml = $res->content); @@ -63,20 +67,23 @@ ok($res); is($res->http_status, 304); is($res->status, URI::Fetch::URI_NOT_MODIFIED()); -is($res->etag, $etag); +# is($res->etag, $etag); is($res->last_modified, $mtime); ok($res->is_success); is($res->content, $xml); ## Test fetch of "moved permanently" resouce. -$res = URI::Fetch->fetch(URI_MOVED); +$res = URI::Fetch->fetch('https://httpstat.us/301'); +# $res = URI::Fetch->fetch(URI_MOVED); ok($res); is($res->status, URI::Fetch::URI_MOVED_PERMANENTLY()); -is($res->http_status, 200); -is($res->uri, URI_OK); +# is($res->http_status, 301); +is($res->uri, 'https://httpstat.us'); + ## Test fetch of "gone" resource. -$res = URI::Fetch->fetch(URI_GONE); +$res = URI::Fetch->fetch('https://httpstat.us/410'); +# $res = URI::Fetch->fetch(URI_GONE); ok($res); is($res->status, URI::Fetch::URI_GONE()); is($res->http_status, 410); @@ -97,7 +104,7 @@ $res = URI::Fetch->fetch(URI_OK, Cache => $cache, ContentAlterHook => sub { my $cref = shift; $$cref = "ALTERED."; }); ok($res); is($res->http_status, 200); -ok($etag = $res->etag); +# ok($etag = $res->etag); ok($mtime = $res->last_modified); is($res->content, "ALTERED."); @@ -163,7 +170,10 @@ ok($res); is($res->http_status, 200); +done_testing(); + package My::Cache; sub new { bless {}, shift } sub get { $_[0]->{ $_[1] } } sub set { $_[0]->{ $_[1] } = $_[2] } + diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/URI-Fetch-0.13/t/02-freezethaw.t new/URI-Fetch-0.15/t/02-freezethaw.t --- old/URI-Fetch-0.13/t/02-freezethaw.t 2016-07-02 10:35:41.000000000 +0200 +++ new/URI-Fetch-0.15/t/02-freezethaw.t 2021-05-27 18:35:12.000000000 +0200 @@ -1,13 +1,11 @@ use strict; -use Test::More; -use Test::RequiresInternet 0.05 'stupidfool.org' => 80; - -plan tests => 11; +use Test::More skip_all => "these are not the tests you're looking for"; +use Test::RequiresInternet 0.05 'httpstatuses.com' => 443; use URI::Fetch; use Data::Dumper; -use constant URI_OK => 'http://stupidfool.org/perl/feeds/ok.xml'; +use constant URI_OK => 'https://httpstatuses.com/200'; my($res, $xml, $etag, $mtime); @@ -16,7 +14,7 @@ $res = URI::Fetch->fetch(URI_OK, Cache => $cache, Freeze=>\&freeze, Thaw=>\&thaw); ok($res); is($res->http_status, 200); -ok($etag = $res->etag); +# ok($etag = $res->etag); ok($mtime = $res->last_modified); ok($xml = $res->content); @@ -30,6 +28,9 @@ is($res->last_modified, $mtime); is($res->content, $xml); +done_testing(); + + #--- alternate freeze/thaw routine sub freeze {
