Hello community, here is the log from the commit of package perl-DateTime-Calendar-Julian for openSUSE:Factory checked in at 2019-01-05 14:41:08 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Comparing /work/SRC/openSUSE:Factory/perl-DateTime-Calendar-Julian (Old) and /work/SRC/openSUSE:Factory/.perl-DateTime-Calendar-Julian.new.28833 (New) ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Package is "perl-DateTime-Calendar-Julian" Sat Jan 5 14:41:08 2019 rev:2 rq:662494 version:0.100 Changes: -------- --- /work/SRC/openSUSE:Factory/perl-DateTime-Calendar-Julian/perl-DateTime-Calendar-Julian.changes 2017-06-25 19:21:06.776924216 +0200 +++ /work/SRC/openSUSE:Factory/.perl-DateTime-Calendar-Julian.new.28833/perl-DateTime-Calendar-Julian.changes 2019-01-05 14:41:09.680541205 +0100 @@ -1,0 +2,6 @@ +Sat Dec 22 06:04:56 UTC 2018 - Stephan Kulow <co...@suse.com> + +- updated to 0.100 + see /usr/share/doc/packages/perl-DateTime-Calendar-Julian/Changes + +------------------------------------------------------------------- Old: ---- DateTime-Calendar-Julian-0.04.tar.gz New: ---- DateTime-Calendar-Julian-0.100.tar.gz cpanspec.yml ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Other differences: ------------------ ++++++ perl-DateTime-Calendar-Julian.spec ++++++ --- /var/tmp/diff_new_pack.SZG5vx/_old 2019-01-05 14:41:10.408540587 +0100 +++ /var/tmp/diff_new_pack.SZG5vx/_new 2019-01-05 14:41:10.412540584 +0100 @@ -1,7 +1,7 @@ # -# spec file for package perl-DateTime-Calendar-Julian (Version 0.04) +# spec file for package perl-DateTime-Calendar-Julian # -# Copyright (c) 2010 SUSE LINUX Products GmbH, Nuernberg, Germany. +# Copyright (c) 2018 SUSE LINUX GmbH, Nuernberg, Germany. # # All modifications and additions to the file contributed by third parties # remain the property of their copyright owners, unless otherwise agreed @@ -12,24 +12,27 @@ # 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/ # + Name: perl-DateTime-Calendar-Julian -Version: 0.04 -Release: 1 -License: Artistic-1.0 or GPL-2.0+ +Version: 0.100 +Release: 0 %define cpan_name DateTime-Calendar-Julian Summary: Dates in the Julian calendar -Url: http://search.cpan.org/dist/DateTime-Calendar-Julian/ +License: Artistic-1.0 OR GPL-1.0-or-later Group: Development/Libraries/Perl -Source: http://www.cpan.org/authors/id/P/PI/PIJLL/%{cpan_name}-%{version}.tar.gz +Url: https://metacpan.org/release/%{cpan_name} +Source0: https://cpan.metacpan.org/authors/id/W/WY/WYANT/%{cpan_name}-%{version}.tar.gz +Source1: cpanspec.yml BuildArch: noarch BuildRoot: %{_tmppath}/%{name}-%{version}-build BuildRequires: perl BuildRequires: perl-macros BuildRequires: perl(DateTime) >= 0.08 -BuildRequires: perl(ExtUtils::MakeMaker) +BuildRequires: perl(Test::More) >= 0.88 +Requires: perl(DateTime) >= 0.08 %{perl_requires} %description @@ -41,22 +44,20 @@ %setup -q -n %{cpan_name}-%{version} %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(-,root,root,755) -%doc Changes LICENSE README +%doc Changes README +%license LICENSE %changelog ++++++ DateTime-Calendar-Julian-0.04.tar.gz -> DateTime-Calendar-Julian-0.100.tar.gz ++++++ diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/DateTime-Calendar-Julian-0.04/Changes new/DateTime-Calendar-Julian-0.100/Changes --- old/DateTime-Calendar-Julian-0.04/Changes 2003-03-26 21:53:29.000000000 +0100 +++ new/DateTime-Calendar-Julian-0.100/Changes 2018-12-21 21:49:36.000000000 +0100 @@ -1,6 +1,11 @@ -Revision history for Perl extension DateTime::Calendar::Julian. +0.100 2018-12-21 T. R. Wyant + - Update author and copyright information. -0.04 2003-03-13 + - Add author tests + + - Update metadata + +0.04 2003-03-13 Eugene van der Pijll - changed output of datetime() to 2000-01-01J00:00:00, to be different from Gregorian dates. @@ -8,7 +13,7 @@ - removed "use Params::Validate", which was superfluous after v0.03 -0.03 2003-03-08 +0.03 2003-03-08 Eugene van der Pijll - removed a bug: adding years now works correctly - added gregorian_deviation() function @@ -20,7 +25,7 @@ workarounds that were necessary for version 0.07 (last_day_of_month, _greg2rd, _rd2greg) -0.02 2003-02-16 +0.02 2003-02-16 Eugene van der Pijll - replaced POSIX::floor with a homegrown version - renamed _greg2rd and _rd2greg to _ymd2rd and _rd2ymd, in @@ -35,6 +40,6 @@ - perhaps most importantly, changed comment in t/1.t: -4712/1/1 is not JD 1, but JD 0 -0.01 2003-02-14 +0.01 2003-02-14 Eugene van der Pijll - original version; the methods that are inherited from DateTime are not well tested yet diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/DateTime-Calendar-Julian-0.04/MANIFEST new/DateTime-Calendar-Julian-0.100/MANIFEST --- old/DateTime-Calendar-Julian-0.04/MANIFEST 2003-03-24 03:49:17.000000000 +0100 +++ new/DateTime-Calendar-Julian-0.100/MANIFEST 2018-12-21 21:50:28.000000000 +0100 @@ -1,9 +1,22 @@ Changes +lib/DateTime/Calendar/Julian.pm LICENSE Makefile.PL MANIFEST +META.yml +META.json README -lib/DateTime/Calendar/Julian.pm t/1.t t/4doy.t t/5week.t +xt/author/basic.t +xt/author/changes.t +xt/author/critic.t +xt/author/executable.t +xt/author/kwalitee.t +xt/author/manifest.t +xt/author/minimum_perl.t +xt/author/perlcriticrc +xt/author/pod.t +xt/author/pod_coverage.t +xt/author/pod_spelling.t diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/DateTime-Calendar-Julian-0.04/META.json new/DateTime-Calendar-Julian-0.100/META.json --- old/DateTime-Calendar-Julian-0.04/META.json 1970-01-01 01:00:00.000000000 +0100 +++ new/DateTime-Calendar-Julian-0.100/META.json 2018-12-21 21:51:26.000000000 +0100 @@ -0,0 +1,66 @@ +{ + "abstract" : "DateTime object in the Julian calendar", + "author" : [ + "Eugene van der Pijll <pi...@gmx.net>", + "Thomas R. Wyant, III <wyant at cpan dot org>" + ], + "dynamic_config" : 0, + "generated_by" : "ExtUtils::MakeMaker version 7.34, CPAN::Meta::Converter version 2.150010", + "license" : [ + "perl_5" + ], + "meta-spec" : { + "url" : "http://search.cpan.org/perldoc?CPAN::Meta::Spec", + "version" : 2 + }, + "name" : "DateTime-Calendar-Julian", + "no_index" : { + "directory" : [ + "t", + "inc", + "t", + "xt" + ] + }, + "prereqs" : { + "build" : { + "requires" : { + "Test::More" : "0.88" + } + }, + "configure" : { + "requires" : { + "ExtUtils::MakeMaker" : "0" + } + }, + "runtime" : { + "requires" : { + "DateTime" : "0.08", + "perl" : "5.008004" + } + } + }, + "provides" : { + "DateTime::Calendar::Julian" : { + "file" : "lib/DateTime/Calendar/Julian.pm", + "version" : "0.100" + } + }, + "release_status" : "stable", + "resources" : { + "bugtracker" : { + "mailto" : "wy...@cpan.org", + "web" : "https://rt.cpan.org/Public/Dist/Display.html?Name=DateTime-Calendar-Julian" + }, + "license" : [ + "http://dev.perl.org/licenses/" + ], + "repository" : { + "type" : "git", + "url" : "git://github.com/trwyant/perl-DateTime-Calendar-Julian.git", + "web" : "https://github.com/trwyant/perl-DateTime-Calendar-Julian" + } + }, + "version" : "0.100", + "x_serialization_backend" : "JSON::PP version 4.00" +} diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/DateTime-Calendar-Julian-0.04/META.yml new/DateTime-Calendar-Julian-0.100/META.yml --- old/DateTime-Calendar-Julian-0.04/META.yml 1970-01-01 01:00:00.000000000 +0100 +++ new/DateTime-Calendar-Julian-0.100/META.yml 2018-12-21 21:51:26.000000000 +0100 @@ -0,0 +1,35 @@ +--- +abstract: 'DateTime object in the Julian calendar' +author: + - 'Eugene van der Pijll <pi...@gmx.net>' + - 'Thomas R. Wyant, III <wyant at cpan dot org>' +build_requires: + Test::More: '0.88' +configure_requires: + ExtUtils::MakeMaker: '0' +dynamic_config: 0 +generated_by: 'ExtUtils::MakeMaker version 7.34, CPAN::Meta::Converter version 2.150010' +license: perl +meta-spec: + url: http://module-build.sourceforge.net/META-spec-v1.4.html + version: '1.4' +name: DateTime-Calendar-Julian +no_index: + directory: + - t + - inc + - t + - xt +provides: + DateTime::Calendar::Julian: + file: lib/DateTime/Calendar/Julian.pm + version: '0.100' +requires: + DateTime: '0.08' + perl: '5.008004' +resources: + bugtracker: https://rt.cpan.org/Public/Dist/Display.html?Name=DateTime-Calendar-Julian + license: http://dev.perl.org/licenses/ + repository: git://github.com/trwyant/perl-DateTime-Calendar-Julian.git +version: '0.100' +x_serialization_backend: 'CPAN::Meta::YAML version 0.018' diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/DateTime-Calendar-Julian-0.04/Makefile.PL new/DateTime-Calendar-Julian-0.100/Makefile.PL --- old/DateTime-Calendar-Julian-0.04/Makefile.PL 2003-03-21 23:23:03.000000000 +0100 +++ new/DateTime-Calendar-Julian-0.100/Makefile.PL 2018-10-20 20:17:13.000000000 +0200 @@ -1,8 +1,93 @@ + +use 5.008004; + use ExtUtils::MakeMaker; -WriteMakefile( - NAME => 'DateTime::Calendar::Julian', + +( my $mmv = ExtUtils::MakeMaker->VERSION ) =~ s/_//g; + +my %attr = ( + NAME => 'DateTime::Calendar::Julian', VERSION_FROM => 'lib/DateTime/Calendar/Julian.pm', PREREQ_PM => { DateTime => 0.08 }, - ABSTRACT => 'DateTime object in the Julian calendar', - AUTHOR => 'Eugene van der Pijll <pi...@gmx.net>', + ABSTRACT => 'DateTime object in the Julian calendar', + AUTHOR => [ + 'Eugene van der Pijll <pi...@gmx.net>', + 'Thomas R. Wyant, III <wyant at cpan dot org>', + ], + realclean => { FILES => 'cover_db' }, ); + +$mmv ge '6.31' and $attr{LICENSE} = 'perl'; + +$mmv ge '6.4701' and $attr{MIN_PERL_VERSION} = '5.008004'; + +if ( $mmv >= 6.4501 ) { + $attr{META_MERGE} = { + 'meta-spec' => { + version => 2, + }, + dynamic_config => 0, + no_index => { + directory => [ qw{ t xt } ], + }, + resources => { + bugtracker => { + web => 'https://rt.cpan.org/Public/Dist/Display.html?Name=DateTime-Calendar-Julian', + mailto => 'wy...@cpan.org', + }, + license => 'http://dev.perl.org/licenses/', + repository => { + type => 'git', + url => 'git://github.com/trwyant/perl-DateTime-Calendar-Julian.git', + web => 'https://github.com/trwyant/perl-DateTime-Calendar-Julian', + }, + }, + provides(), + }; +} + +my %build_requires = ( + 'Test::More' => 0.88, +); + +if ( $mmv >= 6.5501 ) { + $attr{BUILD_REQUIRES} = \%build_requires; +} else { + @{ $attr{PREREQ_PM} }{ keys %build_requires } = values %build_requires; +} + +WriteMakefile( %attr ); + +sub MY::postamble { + my ( $self, @args ) = @_; + + my $authortest = $self->test_via_harness( + '$(FULLPERLRUN)', '$(AUTHORTEST_FILES)' ); + $authortest =~ s/ \s+ \z //smx; + $authortest =~ s/ \A \s+ //smx; + chomp $authortest; + + return <<"EOD"; + +AUTHORTEST_FILES = t/*.t xt/author/*.t + +authortest :: pure_all + AUTHOR_TESTING=1 $authortest + +testcover :: pure_all + cover -test -ignore_re=inc/ -ignore_re=eg/ +EOD +} + +sub provides { + -d 'lib' + or return; + local $@ = undef; + my $provides = eval { + require Module::Metadata; + Module::Metadata->provides( version => 2, dir => 'lib' ); + } or return; + return ( provides => $provides ); +} + +# ex: set textwidth=72 : diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/DateTime-Calendar-Julian-0.04/lib/DateTime/Calendar/Julian.pm new/DateTime-Calendar-Julian-0.100/lib/DateTime/Calendar/Julian.pm --- old/DateTime-Calendar-Julian-0.04/lib/DateTime/Calendar/Julian.pm 2003-03-26 19:06:00.000000000 +0100 +++ new/DateTime-Calendar-Julian-0.100/lib/DateTime/Calendar/Julian.pm 2018-12-21 21:49:36.000000000 +0100 @@ -1,10 +1,11 @@ package DateTime::Calendar::Julian; use strict; +use warnings; use vars qw($VERSION @ISA); -$VERSION = '0.04'; +$VERSION = '0.100'; use DateTime 0.08; @ISA = 'DateTime'; @@ -26,14 +27,14 @@ # This is the difference between Julian and Gregorian calendar: sub _is_leap_year { - my ($self, $year) = @_; + my (undef, $year) = @_; # Invocant unused return ($year % 4 == 0); } # Algorithms from http://home.capecod.net/~pbaum/date/date0.htm -sub _ymd2rd { - my ($self, $y, $m, $d) = @_; +sub _ymd2rd { ## no critic (ProhibitUnusedPrivateSubroutines) + my (undef, $y, $m, $d) = @_; # Invocant unused my $adj = _floor( ($m-3)/12 ); $m -= 12 * $adj; @@ -43,7 +44,7 @@ return $rd; } -sub _rd2ymd { +sub _rd2ymd { ## no critic (ProhibitUnusedPrivateSubroutines) my ($self, $rd, $extra) = @_; my $z = $rd + 308; @@ -174,22 +175,37 @@ Support for this module is provided via the datet...@perl.org email list. See http://lists.perl.org/ for more details. +Bug reports will be accepted as RT tickets or by mail to Wyant. + =head1 AUTHOR Eugene van der Pijll <pi...@gmx.net> -=head1 COPYRIGHT +Thomas R. Wyant, III F<wyant at cpan dot org> + +=head1 COPYRIGHT AND LICENSE + +Copyright (c) 2003 Eugene van der Pijll. All rights reserved. + +Copyright (C) 2018 Thomas R. Wyant, III -Copyright (c) 2003 Eugene van der Pijll. All rights reserved. This -program is free software; you can redistribute it and/or modify it under -the same terms as Perl itself. +This program is free software; you can redistribute it and/or modify it +under the same terms as Perl itself. + +This program is distributed in the hope that it will be useful, but +without any warranty; without even the implied warranty of +merchantability or fitness for a particular purpose. =head1 SEE ALSO -L<DateTime> +L<DateTime|/DateTime> + +L<DateTime::Calendar::Christian|DateTime::Calendar::Christian> datet...@perl.org mailing list -http://datetime.perl.org/ +L<http://datetime.perl.org/> =cut + +# ex: set textwidth=72 : diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/DateTime-Calendar-Julian-0.04/xt/author/basic.t new/DateTime-Calendar-Julian-0.100/xt/author/basic.t --- old/DateTime-Calendar-Julian-0.04/xt/author/basic.t 1970-01-01 01:00:00.000000000 +0100 +++ new/DateTime-Calendar-Julian-0.100/xt/author/basic.t 2016-11-08 18:15:16.000000000 +0100 @@ -0,0 +1,28 @@ +package main; + +use 5.008004; + +use strict; +use warnings; + +use Test::More 0.88; # Because of done_testing(); + +note 'Modules required for development'; + +require_ok 'ExtUtils::Manifest'; + +require_ok 'Perl::MinimumVersion'; + +require_ok 'Test::CPAN::Changes'; + +require_ok 'Test::Kwalitee'; + +require_ok 'Test::Pod'; + +require_ok 'Test::Spelling'; + +done_testing; + +1; + +# ex: set textwidth=72 : diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/DateTime-Calendar-Julian-0.04/xt/author/changes.t new/DateTime-Calendar-Julian-0.100/xt/author/changes.t --- old/DateTime-Calendar-Julian-0.04/xt/author/changes.t 1970-01-01 01:00:00.000000000 +0100 +++ new/DateTime-Calendar-Julian-0.100/xt/author/changes.t 2016-11-02 00:19:58.000000000 +0100 @@ -0,0 +1,27 @@ +package main; + +use 5.008004; + +use strict; +use warnings; + +use Test::More 0.88; # Because of done_testing(); + +BEGIN { + eval { + require Test::CPAN::Changes; + Test::CPAN::Changes->import(); + 1; + } or do { + plan skip_all => 'Unable to load Test::CPAN::Changes'; + exit; + }; +} + +changes_file_ok( Changes => { next_token => 'next_release' } ); + +done_testing; + +1; + +# ex: set textwidth=72 : diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/DateTime-Calendar-Julian-0.04/xt/author/critic.t new/DateTime-Calendar-Julian-0.100/xt/author/critic.t --- old/DateTime-Calendar-Julian-0.04/xt/author/critic.t 1970-01-01 01:00:00.000000000 +0100 +++ new/DateTime-Calendar-Julian-0.100/xt/author/critic.t 2016-11-08 16:47:38.000000000 +0100 @@ -0,0 +1,36 @@ +package main; + +use strict; +use warnings; + +use File::Spec; + +use Test::More 0.88; + +BEGIN { + eval { + require PPI; + PPI->VERSION( 1.215 ); + 1; + } or do { + print "1..0 # skip PPI 1.215 or greater required to criticize code.\n"; + exit; + }; + eval { + require Test::Perl::Critic; + # TODO package profile. + Test::Perl::Critic->import( + -profile => File::Spec->catfile(qw{xt author perlcriticrc}), + ); + 1; + } or do { + print "1..0 # skip Test::Perl::Critic required to criticize code.\n"; + exit; + }; +} + +all_critic_ok(); + +1; + +# ex: set textwidth=72 : diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/DateTime-Calendar-Julian-0.04/xt/author/executable.t new/DateTime-Calendar-Julian-0.100/xt/author/executable.t --- old/DateTime-Calendar-Julian-0.04/xt/author/executable.t 1970-01-01 01:00:00.000000000 +0100 +++ new/DateTime-Calendar-Julian-0.100/xt/author/executable.t 2016-11-01 18:23:45.000000000 +0100 @@ -0,0 +1,36 @@ +package main; + +use strict; +use warnings; + +use ExtUtils::Manifest qw{maniread}; +use Test::More 0.88; + +my $manifest = maniread(); + +foreach ( sort keys %{ $manifest } ) { + m{ \A bin / }smx + and next; + m{ \A eg / }smx + and next; + m{ \A tools / }smx + and next; + + ok ! is_executable(), "$_ should not be executable"; +} + +done_testing; + +sub is_executable { + my @stat = stat $_; + $stat[2] & oct(111) + and return 1; + open my $fh, '<', $_ or die "Unable to open $_: $!\n"; + local $_ = <$fh>; + close $fh; + return m{ \A [#]! .* perl }smx; +} + +1; + +# ex: set textwidth=72 : diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/DateTime-Calendar-Julian-0.04/xt/author/kwalitee.t new/DateTime-Calendar-Julian-0.100/xt/author/kwalitee.t --- old/DateTime-Calendar-Julian-0.04/xt/author/kwalitee.t 1970-01-01 01:00:00.000000000 +0100 +++ new/DateTime-Calendar-Julian-0.100/xt/author/kwalitee.t 2017-01-16 18:53:18.000000000 +0100 @@ -0,0 +1,20 @@ +package main; + +use 5.008004; + +use strict; +use warnings; + +use Test::More 0.88; + +eval { + require Test::Kwalitee; + Test::Kwalitee->import(); + -f 'Debian_CPANTS.txt' # Don't know what this is, + and unlink 'Debian_CPANTS.txt'; # but _I_ didn't order it. + 1; +} or plan skip_all => 'Test::Kwalitee not found'; + +1; + +# ex: set textwidth=72 : diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/DateTime-Calendar-Julian-0.04/xt/author/manifest.t new/DateTime-Calendar-Julian-0.100/xt/author/manifest.t --- old/DateTime-Calendar-Julian-0.04/xt/author/manifest.t 1970-01-01 01:00:00.000000000 +0100 +++ new/DateTime-Calendar-Julian-0.100/xt/author/manifest.t 2016-11-01 18:44:43.000000000 +0100 @@ -0,0 +1,26 @@ +package main; + +use strict; +use warnings; + +use Test::More 0.88; + +BEGIN { + eval { + require ExtUtils::Manifest; + 1; + } or do { + plan skip_all => 'Can not load ExtUtils::Manifest'; + exit; + }; +} + +my @got = ExtUtils::Manifest->manicheck(); +ok @got == 0, 'Missing files per MANIFEST'; + +@got = ExtUtils::Manifest->filecheck(); +ok @got == 0, 'Files not in MANIFEST or MANIFEST.SKIP'; + +done_testing; + +1; diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/DateTime-Calendar-Julian-0.04/xt/author/minimum_perl.t new/DateTime-Calendar-Julian-0.100/xt/author/minimum_perl.t --- old/DateTime-Calendar-Julian-0.04/xt/author/minimum_perl.t 1970-01-01 01:00:00.000000000 +0100 +++ new/DateTime-Calendar-Julian-0.100/xt/author/minimum_perl.t 2016-11-20 05:25:46.000000000 +0100 @@ -0,0 +1,67 @@ +package main; + +use 5.008004; + +use strict; +use warnings; + +use Test::More 0.88; # Because of done_testing(); + +eval { + require ExtUtils::Manifest; + 1; +} or plan skip_all => 'Unable to load ExtUtils::Manifest'; + +eval { + require Perl::MinimumVersion; + 1; +} or plan skip_all => 'Unable to load Perl::MinimumVersion'; + +eval { + require version; + 1; +} or plan skip_all => 'Unable to load version'; + +my $min_perl = '5.008004'; +my $min_perl_vers = version->parse( $min_perl ); + +my $manifest = ExtUtils::Manifest::maniread(); + +foreach my $fn ( sort keys %{ $manifest } ) { + $fn =~ m{ \A xt/ }smx + and next; + is_perl( $fn ) + or next; + my $doc = Perl::MinimumVersion->new( $fn ); + cmp_ok $doc->minimum_version(), 'le', $min_perl, + "$fn works under Perl $min_perl"; + my $ppi_doc = $doc->Document(); + foreach my $inc ( + @{ $ppi_doc->find( 'PPI::Statement::Include' ) || [] } ) { + my $vers = $inc->version() + or next; + cmp_ok( version->parse( $vers ), '==', $min_perl_vers, + "$fn has use $min_perl, rather than some other version" ); + last; + } +} + +done_testing; + +sub is_perl { + my ( $fn ) = @_; + $fn =~ m/ [.] (?: pm | t | pod | (?i: pl ) ) \z /smx + and return 1; + -f $fn + and -T _ + or return 0; + open my $fh, '<', $fn + or return 0; + local $_ = <$fh>; + close $fh; + return m/ perl /smx; +} + +1; + +# ex: set textwidth=72 : diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/DateTime-Calendar-Julian-0.04/xt/author/perlcriticrc new/DateTime-Calendar-Julian-0.100/xt/author/perlcriticrc --- old/DateTime-Calendar-Julian-0.04/xt/author/perlcriticrc 1970-01-01 01:00:00.000000000 +0100 +++ new/DateTime-Calendar-Julian-0.100/xt/author/perlcriticrc 2016-11-08 16:47:26.000000000 +0100 @@ -0,0 +1,89 @@ +severity = stern +theme = core + +[Perl::Critic::Policy::BuiltinFunctions::ProhibitStringyEval] + +allow_includes = 1 + +[Perl::Critic::Policy::CodeLayout::ProhibitHardTabs] + +# I don't intend to comply with this at this point. +severity = 2 + +[Perl::Critic::Policy::Documentation::PodSpelling] + +spell_command = aspell list + +[Perl::Critic::Policy::ErrorHandling::RequireCheckingReturnValueOfEval] + +# The default is 3 ('harsh'), but I think this is more severe than that. + +severity = stern + +[Perl::Critic::Policy::InputOutput::ProhibitInteractiveTest] + +# Perl::Critic and Perl Best Practices prefer the IO::Interactive +# is_interactive() subroutine to -T STDIN. But that assumes that +# ARGV is used for input, and that you don't want to be interactive +# if output goes to a pipe. I do not want these assumptions, but +# rather than disable them in the code I am simply assigning them +# a severity slightly higher than I currently use. + +severity = cruel + +[Perl::Critic::Policy::InputOutput::RequireCheckedOpen] + +# For some reason the default is 3 ('harsh'). But IM(NS)HO this +# kind of thing should be a 5. So: + +severity = gentle + +[Perl::Critic::Policy::Miscellanea::ProhibitUselessNoCritic] + +severity = stern + +[Perl::Critic::Policy::Subroutines::ProhibitUnusedPrivateSubroutines] + +severity = stern +private_name_regex = _(?!_)\w+ + +[Perl::Critic::Policy::Subroutines::RequireArgUnpacking] + +allow_delegation_to = __arguments _arguments grep map +short_subroutine_statements = 3 + +[Perl::Critic::Policy::Subroutines::RequireFinalReturn] + +terminal_funcs = CORE::exit + +[Perl::Critic::Policy::TestingAndDebugging::ProhibitNoStrict] + +allow = refs + +[Perl::Critic::Policy::TestingAndDebugging::ProhibitNoWarnings] + +allow = exiting once substr uninitialized + +[Perl::Critic::Policy::ValuesAndExpressions::ProhibitConstantPragma] + +# Perl::Critic and Perl Best Practices do not like the 'constant' +# pragma because it does not interpolate. It really does, the +# syntax is just different. Rather than disable the things in the +# source, I'm just assigning them a severity slightly greater than +# I customarily use. + +severity = cruel + +[Perl::Critic::Policy::ValuesAndExpressions::ProhibitInterpolationOfLiterals] + +# This policy is severity 1 by default, but because of the desire to +# localize messages I want it severe enough that I get output. + +severity = gentle + +[Perl::Critic::Policy::Variables::ProhibitUnusedVarsStricter] + +add_themes = core +allow_if_computed_by = __arguments _arguments +allow_unused_subroutine_arguments = 0 +severity = stern diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/DateTime-Calendar-Julian-0.04/xt/author/pod.t new/DateTime-Calendar-Julian-0.100/xt/author/pod.t --- old/DateTime-Calendar-Julian-0.04/xt/author/pod.t 1970-01-01 01:00:00.000000000 +0100 +++ new/DateTime-Calendar-Julian-0.100/xt/author/pod.t 2016-11-01 17:19:18.000000000 +0100 @@ -0,0 +1,26 @@ +package main; + +use strict; +use warnings; + +use Test::More 0.88; + +BEGIN { + eval { + require Test::Pod; + Test::Pod->VERSION (1.00); + Test::Pod->import(); + 1; + } or do { + print <<eod; +1..0 # skip Test::Pod 1.00 or higher required to test POD validity. +eod + exit; + }; +} + +all_pod_files_ok (); + +1; + +# ex: set textwidth=72 : diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/DateTime-Calendar-Julian-0.04/xt/author/pod_coverage.t new/DateTime-Calendar-Julian-0.100/xt/author/pod_coverage.t --- old/DateTime-Calendar-Julian-0.04/xt/author/pod_coverage.t 1970-01-01 01:00:00.000000000 +0100 +++ new/DateTime-Calendar-Julian-0.100/xt/author/pod_coverage.t 2018-10-20 20:23:36.000000000 +0200 @@ -0,0 +1,68 @@ +package main; + +use strict; +use warnings; + +use Test::More 0.88; + +BEGIN { + eval { + require Test::Pod::Coverage; + Test::Pod::Coverage->VERSION(1.00); + Test::Pod::Coverage->import(); + 1; + } or do { + print <<eod; +1..0 # skip Test::Pod::Coverage 1.00 or greater required. +eod + exit; + }; +} + + +{ + +=begin comment + + # all_pod_coverage_ok() will load the module for us, but we load it + # explicitly because we want to tinker with its inheritance. + require DateTime::Calendar::Julian; + + # This hack causes all DateTime methods to be considered documented. + # Wish there was a cleaner way. + local @DateTime::Calendar::Julian::ISA = qw{ DateTime }; + +=end comment + +=cut + + all_pod_coverage_ok ({ + also_private => [ + qr{ \A [[:upper:]\d_]+ \z }smx, + ], + # The following are DateTime methods not documented by that + # module in any way that Pod::Coverage recognizes + trustme => [ + qr{ \A day_0 \z }smx, + qr{ \A day_of_ (?: month (?: _0 )? | week_0 | quarter_0 | + year_0 ) \Z }smx, + qr{ \A do [qwy] (?: _0 )? \z }smx, + qr{ \A era \z }smx, + qr{ \A iso8601 \z }smx, + qr{ \A local_rd_as_seconds \Z }smx, + qr{ \A mday (?: _0 )? \z }smx, + qr{ \A min \z }smx, + qr{ \A mon (?: (?: th )? _0 )? \z }smx, + qr{ \A quarter_0 \z }smx, + qr{ \A sec \z }smx, + qr{ \A STORABLE_ (?: freeze | thaw ) \z }smx, + qr{ \A utc_year \z }smx, + qr{ \A wday (?: _0 )? \z }smx, + ], + coverage_class => 'Pod::Coverage::CountParents' + }); + +} +1; + +# ex: set textwidth=72 : diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/DateTime-Calendar-Julian-0.04/xt/author/pod_spelling.t new/DateTime-Calendar-Julian-0.100/xt/author/pod_spelling.t --- old/DateTime-Calendar-Julian-0.04/xt/author/pod_spelling.t 1970-01-01 01:00:00.000000000 +0100 +++ new/DateTime-Calendar-Julian-0.100/xt/author/pod_spelling.t 2018-10-20 20:34:49.000000000 +0200 @@ -0,0 +1,33 @@ +package main; + +# ex: set textwidth=72 : + +use strict; +use warnings; + +BEGIN { + eval { + require Test::Spelling; + Test::Spelling->import(); + 1; + } or do { + print "1..0 # skip Test::Spelling not available.\n"; + exit; + }; +} + +add_stopwords (<DATA>); + +all_pod_files_spelling_ok (); + +1; + +__DATA__ +der +Dionysius +Exiguus +merchantability +Pijll +proleptic +th +Wyant ++++++ cpanspec.yml ++++++ --- #description_paragraphs: 3 #description: |- # override description from CPAN #summary: override summary from CPAN #no_testing: broken upstream #sources: # - source1 # - source2 #patches: # foo.patch: -p1 # bar.patch: #preamble: |- # BuildRequires: gcc-c++ #post_prep: |- # hunspell=`pkg-config --libs hunspell | sed -e 's,-l,,; s, *,,g'` # sed -i -e "s,hunspell-X,$hunspell," t/00-prereq.t Makefile.PL #post_build: |- # rm unused.files #post_install: |- # sed on %{name}.files #license: SUSE-NonFree #skip_noarch: 1 #custom_build: |- #./Build build flags=%{?_smp_mflags} --myflag #custom_test: |- #startserver && make test #ignore_requires: Bizarre::Module