Script 'mail_helper' called by obssrc
Hello community,
here is the log from the commit of package perl-Module-CPANTS-Analyse for
openSUSE:Factory checked in at 2023-09-13 20:44:23
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Comparing /work/SRC/openSUSE:Factory/perl-Module-CPANTS-Analyse (Old)
and /work/SRC/openSUSE:Factory/.perl-Module-CPANTS-Analyse.new.1766 (New)
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Package is "perl-Module-CPANTS-Analyse"
Wed Sep 13 20:44:23 2023 rev:2 rq:1110672 version:1.20.0
Changes:
--------
---
/work/SRC/openSUSE:Factory/perl-Module-CPANTS-Analyse/perl-Module-CPANTS-Analyse.changes
2021-09-15 22:51:33.442919223 +0200
+++
/work/SRC/openSUSE:Factory/.perl-Module-CPANTS-Analyse.new.1766/perl-Module-CPANTS-Analyse.changes
2023-09-13 20:45:16.771606743 +0200
@@ -1,0 +2,18 @@
+Mon Sep 11 03:09:10 UTC 2023 - Tina Müller <[email protected]>
+
+- updated to 1.02
+ see /usr/share/doc/packages/perl-Module-CPANTS-Analyse/Changes
+
+ 1.02 2023-09-10
+ - Treat use v5.36 as use_warnings
+ - Skip some of the manifest test if symlink is not available
+ - Improve prereq sorting
+ - Improve pod detection
+ - Improve script detection
+ - Use Parse::Distname to get a little more information from a distribution
name
+ - Dedupe possible licences
+ - Add Object::Pad as use strict equivalent (Wesley Schwengle)
+ - Fix has_license_in_source_file for distributions that contain only a
+ script under bin or scripts (Sven Kirmess)
+
+-------------------------------------------------------------------
Old:
----
Module-CPANTS-Analyse-1.01.tar.gz
New:
----
Module-CPANTS-Analyse-1.02.tar.gz
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Other differences:
------------------
++++++ perl-Module-CPANTS-Analyse.spec ++++++
--- /var/tmp/diff_new_pack.AJG347/_old 2023-09-13 20:45:18.263659787 +0200
+++ /var/tmp/diff_new_pack.AJG347/_new 2023-09-13 20:45:18.263659787 +0200
@@ -1,7 +1,7 @@
#
# spec file for package perl-Module-CPANTS-Analyse
#
-# Copyright (c) 2021 SUSE LLC
+# Copyright (c) 2023 SUSE LLC
#
# All modifications and additions to the file contributed by third parties
# remain the property of their copyright owners, unless otherwise agreed
@@ -18,12 +18,13 @@
%define cpan_name Module-CPANTS-Analyse
Name: perl-Module-CPANTS-Analyse
-Version: 1.01
+Version: 1.20.0
Release: 0
+%define cpan_version 1.02
License: Artistic-1.0 OR GPL-1.0-or-later
Summary: Generate Kwalitee ratings for a distribution
URL: https://metacpan.org/release/%{cpan_name}
-Source0:
https://cpan.metacpan.org/authors/id/I/IS/ISHIGAKI/%{cpan_name}-%{version}.tar.gz
+Source0:
https://cpan.metacpan.org/authors/id/I/IS/ISHIGAKI/%{cpan_name}-%{cpan_version}.tar.gz
Source1: cpanspec.yml
BuildArch: noarch
BuildRequires: perl
@@ -31,16 +32,16 @@
BuildRequires: perl(Archive::Any::Lite) >= 0.06
BuildRequires: perl(Archive::Tar) >= 1.76
BuildRequires: perl(Array::Diff) >= 0.04
-BuildRequires: perl(CPAN::DistnameInfo) >= 0.06
BuildRequires: perl(CPAN::Meta::Validator) >= 2.133380
BuildRequires: perl(CPAN::Meta::YAML) >= 0.008
BuildRequires: perl(Class::Accessor) >= 0.19
BuildRequires: perl(Data::Binary)
-BuildRequires: perl(ExtUtils::MakeMaker::CPANfile) >= 0.08
-BuildRequires: perl(File::Find::Object) >= v0.2.1
+BuildRequires: perl(ExtUtils::MakeMaker::CPANfile) >= 0.09
+BuildRequires: perl(File::Find::Object) >= 0.2.1
BuildRequires: perl(JSON::PP)
BuildRequires: perl(List::Util) >= 1.33
BuildRequires: perl(Module::Find)
+BuildRequires: perl(Parse::Distname)
BuildRequires: perl(Perl::PrereqScanner::NotQuiteLite) >= 0.9901
BuildRequires: perl(Software::License) >= 0.103012
BuildRequires: perl(Test::FailWarnings)
@@ -49,18 +50,37 @@
Requires: perl(Archive::Any::Lite) >= 0.06
Requires: perl(Archive::Tar) >= 1.76
Requires: perl(Array::Diff) >= 0.04
-Requires: perl(CPAN::DistnameInfo) >= 0.06
Requires: perl(CPAN::Meta::Validator) >= 2.133380
Requires: perl(CPAN::Meta::YAML) >= 0.008
Requires: perl(Class::Accessor) >= 0.19
Requires: perl(Data::Binary)
-Requires: perl(File::Find::Object) >= v0.2.1
+Requires: perl(File::Find::Object) >= 0.2.1
Requires: perl(JSON::PP)
Requires: perl(List::Util) >= 1.33
Requires: perl(Module::Find)
+Requires: perl(Parse::Distname)
Requires: perl(Perl::PrereqScanner::NotQuiteLite) >= 0.9901
Requires: perl(Software::License) >= 0.103012
Requires: perl(version) >= 0.73
+Provides: perl(Module::CPANTS::Analyse) = 1.20.0
+Provides: perl(Module::CPANTS::Kwalitee) = 1.20.0
+Provides: perl(Module::CPANTS::Kwalitee::BrokenInstaller) = 1.20.0
+Provides: perl(Module::CPANTS::Kwalitee::CpantsErrors) = 1.20.0
+Provides: perl(Module::CPANTS::Kwalitee::Distname) = 1.20.0
+Provides: perl(Module::CPANTS::Kwalitee::Distros) = 1.20.0
+Provides: perl(Module::CPANTS::Kwalitee::Files) = 1.20.0
+Provides: perl(Module::CPANTS::Kwalitee::FindModules) = 1.20.0
+Provides: perl(Module::CPANTS::Kwalitee::License) = 1.20.0
+Provides: perl(Module::CPANTS::Kwalitee::Manifest) = 1.20.0
+Provides: perl(Module::CPANTS::Kwalitee::MetaYML) = 1.20.0
+Provides: perl(Module::CPANTS::Kwalitee::NeedsCompiler) = 1.20.0
+Provides: perl(Module::CPANTS::Kwalitee::Pod) = 1.20.0
+Provides: perl(Module::CPANTS::Kwalitee::Prereq) = 1.20.0
+Provides: perl(Module::CPANTS::Kwalitee::Repackageable) = 1.20.0
+Provides: perl(Module::CPANTS::Kwalitee::Signature) = 1.20.0
+Provides: perl(Module::CPANTS::Kwalitee::Uses) = 1.20.0
+Provides: perl(Module::CPANTS::Kwalitee::Version) = 1.20.0
+%define __perllib_provides /bin/true
%{perl_requires}
# MANUAL BEGIN
Source99: rpmlintrc
@@ -70,7 +90,7 @@
Generate Kwalitee ratings for a distribution
%prep
-%autosetup -n %{cpan_name}-%{version}
+%autosetup -n %{cpan_name}-%{cpan_version}
%build
perl Makefile.PL INSTALLDIRS=vendor
++++++ Module-CPANTS-Analyse-1.01.tar.gz -> Module-CPANTS-Analyse-1.02.tar.gz
++++++
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Module-CPANTS-Analyse-1.01/.travis.yml
new/Module-CPANTS-Analyse-1.02/.travis.yml
--- old/Module-CPANTS-Analyse-1.01/.travis.yml 2019-08-08 05:44:35.000000000
+0200
+++ new/Module-CPANTS-Analyse-1.02/.travis.yml 1970-01-01 01:00:00.000000000
+0100
@@ -1,16 +0,0 @@
-dist: trusty
-language: perl
-perl:
-# - "5.8.1"
- - "5.8"
- - "5.10"
- - "5.12"
- - "5.14"
- - "5.16"
- - "5.18"
- - "5.20"
- - "5.22"
- - "5.24"
- - "5.26"
- - "5.28"
-# - "blead"
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Module-CPANTS-Analyse-1.01/Changes
new/Module-CPANTS-Analyse-1.02/Changes
--- old/Module-CPANTS-Analyse-1.01/Changes 2019-08-08 05:57:09.000000000
+0200
+++ new/Module-CPANTS-Analyse-1.02/Changes 2023-09-10 05:21:46.000000000
+0200
@@ -1,5 +1,17 @@
Revision history for Module-CPANTS-Analyse
+1.02 2023-09-10
+ - Treat use v5.36 as use_warnings
+ - Skip some of the manifest test if symlink is not available
+ - Improve prereq sorting
+ - Improve pod detection
+ - Improve script detection
+ - Use Parse::Distname to get a little more information from a distribution
name
+ - Dedupe possible licences
+ - Add Object::Pad as use strict equivalent (Wesley Schwengle)
+ - Fix has_license_in_source_file for distributions that contain only a
+ script under bin or scripts (Sven Kirmess)
+
1.01 2019-08-08
- Fixed not to set an error message when extracted nicely
(spotted by Martin Becker++)
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Module-CPANTS-Analyse-1.01/MANIFEST
new/Module-CPANTS-Analyse-1.02/MANIFEST
--- old/Module-CPANTS-Analyse-1.01/MANIFEST 2019-08-08 05:57:30.000000000
+0200
+++ new/Module-CPANTS-Analyse-1.02/MANIFEST 2023-09-10 05:26:15.000000000
+0200
@@ -1,4 +1,3 @@
-.travis.yml
AUTHORS
Changes
cpanfile
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Module-CPANTS-Analyse-1.01/MANIFEST.SKIP
new/Module-CPANTS-Analyse-1.02/MANIFEST.SKIP
--- old/Module-CPANTS-Analyse-1.01/MANIFEST.SKIP 2019-02-03
04:27:37.000000000 +0100
+++ new/Module-CPANTS-Analyse-1.02/MANIFEST.SKIP 2023-09-10
05:23:26.000000000 +0200
@@ -58,3 +58,6 @@
^tmp/
^xt/
+
+^.travis.yml
+^.github/
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Module-CPANTS-Analyse-1.01/META.json
new/Module-CPANTS-Analyse-1.02/META.json
--- old/Module-CPANTS-Analyse-1.01/META.json 2019-08-08 05:57:30.000000000
+0200
+++ new/Module-CPANTS-Analyse-1.02/META.json 2023-09-10 05:26:15.000000000
+0200
@@ -5,7 +5,7 @@
"Kenichi Ishigaki <[email protected]>"
],
"dynamic_config" : 0,
- "generated_by" : "ExtUtils::MakeMaker version 7.24, CPAN::Meta::Converter
version 2.150010",
+ "generated_by" : "ExtUtils::MakeMaker version 7.70, CPAN::Meta::Converter
version 2.150010",
"keywords" : [
"CPANTS",
"kwalitee"
@@ -32,7 +32,7 @@
},
"configure" : {
"requires" : {
- "ExtUtils::MakeMaker::CPANfile" : "0.08",
+ "ExtUtils::MakeMaker::CPANfile" : "0.09",
"perl" : "5.008001"
}
},
@@ -41,7 +41,6 @@
"Archive::Any::Lite" : "0.06",
"Archive::Tar" : "1.76",
"Array::Diff" : "0.04",
- "CPAN::DistnameInfo" : "0.06",
"CPAN::Meta::Validator" : "2.133380",
"CPAN::Meta::YAML" : "0.008",
"Class::Accessor" : "0.19",
@@ -50,6 +49,7 @@
"JSON::PP" : "0",
"List::Util" : "1.33",
"Module::Find" : "0",
+ "Parse::Distname" : "0",
"Perl::PrereqScanner::NotQuiteLite" : "0.9901",
"Software::License" : "0.103012",
"Text::Balanced" : "0",
@@ -79,6 +79,6 @@
"url" : "https://github.com/cpants/Module-CPANTS-Analyse"
}
},
- "version" : "1.01",
- "x_serialization_backend" : "JSON::PP version 4.00"
+ "version" : "1.02",
+ "x_serialization_backend" : "JSON::PP version 4.16"
}
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Module-CPANTS-Analyse-1.01/META.yml
new/Module-CPANTS-Analyse-1.02/META.yml
--- old/Module-CPANTS-Analyse-1.01/META.yml 2019-08-08 05:57:30.000000000
+0200
+++ new/Module-CPANTS-Analyse-1.02/META.yml 2023-09-10 05:26:15.000000000
+0200
@@ -9,10 +9,10 @@
Test::FailWarnings: '0'
Test::More: '0.88'
configure_requires:
- ExtUtils::MakeMaker::CPANfile: '0.08'
+ ExtUtils::MakeMaker::CPANfile: '0.09'
perl: '5.008001'
dynamic_config: 0
-generated_by: 'ExtUtils::MakeMaker version 7.24, CPAN::Meta::Converter version
2.150010'
+generated_by: 'ExtUtils::MakeMaker version 7.70, CPAN::Meta::Converter version
2.150010'
keywords:
- CPANTS
- kwalitee
@@ -29,7 +29,6 @@
Archive::Any::Lite: '0.06'
Archive::Tar: '1.76'
Array::Diff: '0.04'
- CPAN::DistnameInfo: '0.06'
CPAN::Meta::Validator: '2.133380'
CPAN::Meta::YAML: '0.008'
Class::Accessor: '0.19'
@@ -38,6 +37,7 @@
JSON::PP: '0'
List::Util: '1.33'
Module::Find: '0'
+ Parse::Distname: '0'
Perl::PrereqScanner::NotQuiteLite: '0.9901'
Software::License: '0.103012'
Text::Balanced: '0'
@@ -47,5 +47,5 @@
bugtracker:
https://rt.cpan.org/Public/Dist/Display.html?Name=Module-CPANTS-Analyse
homepage: https://cpants.cpanauthors.org
repository: https://github.com/cpants/Module-CPANTS-Analyse
-version: '1.01'
-x_serialization_backend: 'CPAN::Meta::YAML version 0.012'
+version: '1.02'
+x_serialization_backend: 'CPAN::Meta::YAML version 0.018'
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Module-CPANTS-Analyse-1.01/cpanfile
new/Module-CPANTS-Analyse-1.02/cpanfile
--- old/Module-CPANTS-Analyse-1.01/cpanfile 2019-08-08 05:41:24.000000000
+0200
+++ new/Module-CPANTS-Analyse-1.02/cpanfile 2023-09-10 05:12:59.000000000
+0200
@@ -2,7 +2,6 @@
requires 'Archive::Any::Lite' => '0.06';
requires 'Archive::Tar' => '1.76'; # filter_cb
requires 'Class::Accessor' => '0.19';
-requires 'CPAN::DistnameInfo' => '0.06';
requires 'CPAN::Meta::YAML' => '0.008';
requires 'CPAN::Meta::Validator' => '2.133380';
requires 'Data::Binary' => '0';
@@ -10,6 +9,7 @@
requires 'JSON::PP' => 0;
requires 'List::Util' => '1.33';
requires 'Module::Find';
+requires 'Parse::Distname';
requires 'Perl::PrereqScanner::NotQuiteLite' => '0.9901';
requires 'perl' => '5.008001';
requires 'Software::License' => '0.103012';
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore'
old/Module-CPANTS-Analyse-1.01/lib/Module/CPANTS/Analyse.pm
new/Module-CPANTS-Analyse-1.02/lib/Module/CPANTS/Analyse.pm
--- old/Module-CPANTS-Analyse-1.01/lib/Module/CPANTS/Analyse.pm 2019-08-08
05:43:42.000000000 +0200
+++ new/Module-CPANTS-Analyse-1.02/lib/Module/CPANTS/Analyse.pm 2023-09-10
05:13:16.000000000 +0200
@@ -9,9 +9,9 @@
use File::stat;
use Archive::Any::Lite;
use Carp;
-use CPAN::DistnameInfo;
+use Parse::Distname;
-our $VERSION = '1.01';
+our $VERSION = '1.02';
$VERSION =~ s/_//; ## no critic
__PACKAGE__->mk_accessors(qw(dist opts tarball distdir d mck));
@@ -51,7 +51,7 @@
my $me = shift;
return 'cant find dist' unless $me->dist;
- my $di = CPAN::DistnameInfo->new($me->dist);
+ my $di = Parse::Distname->new($me->dist);
my $ext = $di->extension || 'unknown';
$me->d->{package} = $di->filename;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore'
old/Module-CPANTS-Analyse-1.01/lib/Module/CPANTS/Kwalitee/BrokenInstaller.pm
new/Module-CPANTS-Analyse-1.02/lib/Module/CPANTS/Kwalitee/BrokenInstaller.pm
---
old/Module-CPANTS-Analyse-1.01/lib/Module/CPANTS/Kwalitee/BrokenInstaller.pm
2019-08-08 05:43:42.000000000 +0200
+++
new/Module-CPANTS-Analyse-1.02/lib/Module/CPANTS/Kwalitee/BrokenInstaller.pm
2023-09-10 05:13:16.000000000 +0200
@@ -3,7 +3,7 @@
use strict;
use File::Spec::Functions qw(catfile);
-our $VERSION = '1.01';
+our $VERSION = '1.02';
$VERSION =~ s/_//; ## no critic
sub order { 100 }
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore'
old/Module-CPANTS-Analyse-1.01/lib/Module/CPANTS/Kwalitee/CpantsErrors.pm
new/Module-CPANTS-Analyse-1.02/lib/Module/CPANTS/Kwalitee/CpantsErrors.pm
--- old/Module-CPANTS-Analyse-1.01/lib/Module/CPANTS/Kwalitee/CpantsErrors.pm
2019-08-08 05:43:42.000000000 +0200
+++ new/Module-CPANTS-Analyse-1.02/lib/Module/CPANTS/Kwalitee/CpantsErrors.pm
2023-09-10 05:13:16.000000000 +0200
@@ -3,7 +3,7 @@
use strict;
use version;
-our $VERSION = '1.01';
+our $VERSION = '1.02';
$VERSION =~ s/_//; ## no critic
sub order { 1000 }
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore'
old/Module-CPANTS-Analyse-1.01/lib/Module/CPANTS/Kwalitee/Distname.pm
new/Module-CPANTS-Analyse-1.02/lib/Module/CPANTS/Kwalitee/Distname.pm
--- old/Module-CPANTS-Analyse-1.01/lib/Module/CPANTS/Kwalitee/Distname.pm
2019-08-08 05:43:42.000000000 +0200
+++ new/Module-CPANTS-Analyse-1.02/lib/Module/CPANTS/Kwalitee/Distname.pm
2023-09-10 05:13:16.000000000 +0200
@@ -2,7 +2,7 @@
use warnings;
use strict;
-our $VERSION = '1.01';
+our $VERSION = '1.02';
$VERSION =~ s/_//; ## no critic
sub order { 20 }
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore'
old/Module-CPANTS-Analyse-1.01/lib/Module/CPANTS/Kwalitee/Distros.pm
new/Module-CPANTS-Analyse-1.02/lib/Module/CPANTS/Kwalitee/Distros.pm
--- old/Module-CPANTS-Analyse-1.01/lib/Module/CPANTS/Kwalitee/Distros.pm
2019-08-08 05:43:42.000000000 +0200
+++ new/Module-CPANTS-Analyse-1.02/lib/Module/CPANTS/Kwalitee/Distros.pm
2023-09-10 05:13:16.000000000 +0200
@@ -2,7 +2,7 @@
use warnings;
use strict;
-our $VERSION = '1.01';
+our $VERSION = '1.02';
$VERSION =~ s/_//; ## no critic
sub order { 800 }
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore'
old/Module-CPANTS-Analyse-1.01/lib/Module/CPANTS/Kwalitee/Files.pm
new/Module-CPANTS-Analyse-1.02/lib/Module/CPANTS/Kwalitee/Files.pm
--- old/Module-CPANTS-Analyse-1.01/lib/Module/CPANTS/Kwalitee/Files.pm
2019-08-08 05:43:42.000000000 +0200
+++ new/Module-CPANTS-Analyse-1.02/lib/Module/CPANTS/Kwalitee/Files.pm
2023-09-10 05:13:16.000000000 +0200
@@ -7,7 +7,7 @@
use ExtUtils::Manifest qw(maniskip);
$ExtUtils::Manifest::Quiet = 1;
-our $VERSION = '1.01';
+our $VERSION = '1.02';
$VERSION =~ s/_//; ## no critic
our $RespectManiskip = 1; # for Test::Kwalitee and its friends
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore'
old/Module-CPANTS-Analyse-1.01/lib/Module/CPANTS/Kwalitee/FindModules.pm
new/Module-CPANTS-Analyse-1.02/lib/Module/CPANTS/Kwalitee/FindModules.pm
--- old/Module-CPANTS-Analyse-1.01/lib/Module/CPANTS/Kwalitee/FindModules.pm
2019-08-08 05:43:42.000000000 +0200
+++ new/Module-CPANTS-Analyse-1.02/lib/Module/CPANTS/Kwalitee/FindModules.pm
2023-09-10 05:13:16.000000000 +0200
@@ -3,7 +3,7 @@
use strict;
use File::Spec::Functions qw(catfile);
-our $VERSION = '1.01';
+our $VERSION = '1.02';
$VERSION =~ s/_//; ## no critic
sub order { 30 }
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore'
old/Module-CPANTS-Analyse-1.01/lib/Module/CPANTS/Kwalitee/License.pm
new/Module-CPANTS-Analyse-1.02/lib/Module/CPANTS/Kwalitee/License.pm
--- old/Module-CPANTS-Analyse-1.01/lib/Module/CPANTS/Kwalitee/License.pm
2019-08-08 05:43:42.000000000 +0200
+++ new/Module-CPANTS-Analyse-1.02/lib/Module/CPANTS/Kwalitee/License.pm
2023-09-10 05:13:16.000000000 +0200
@@ -4,7 +4,7 @@
use File::Spec::Functions qw(catfile);
use Software::LicenseUtils;
-our $VERSION = '1.01';
+our $VERSION = '1.02';
$VERSION =~ s/_//; ## no critic
sub order { 100 }
@@ -41,7 +41,7 @@
# check pod
my %licenses;
- foreach my $file (grep { /\.(?:pm|pod|pl|PL)$/ } sort @$files ) {
+ foreach my $file (grep { m!^(?:bin|scripts?)/|\.(?:pm|pod|pl|PL)$! } sort
@$files ) {
next if $file =~ /(?:Makefile|Build)\.PL$/;
my $path = catfile($distdir, $file);
next unless -r $path; # skip if not readable
@@ -95,7 +95,8 @@
}
}
if (@possible_licenses) {
- @possible_licenses = map { s/^Software::License:://; $_ }
@possible_licenses;
+ my %seen;
+ @possible_licenses = grep {!$seen{$_}++} map {
s/^Software::License:://; $_ } @possible_licenses;
push @{$licenses{$_} ||= []}, $file for @possible_licenses;
$me->d->{files_hash}{$file}{license} = join ',',
@possible_licenses;
} else {
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore'
old/Module-CPANTS-Analyse-1.01/lib/Module/CPANTS/Kwalitee/Manifest.pm
new/Module-CPANTS-Analyse-1.02/lib/Module/CPANTS/Kwalitee/Manifest.pm
--- old/Module-CPANTS-Analyse-1.01/lib/Module/CPANTS/Kwalitee/Manifest.pm
2019-08-08 05:43:42.000000000 +0200
+++ new/Module-CPANTS-Analyse-1.02/lib/Module/CPANTS/Kwalitee/Manifest.pm
2023-09-10 05:13:16.000000000 +0200
@@ -4,7 +4,7 @@
use File::Spec::Functions qw(catfile);
use Array::Diff;
-our $VERSION = '1.01';
+our $VERSION = '1.02';
$VERSION =~ s/_//; ## no critic
sub order { 100 }
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore'
old/Module-CPANTS-Analyse-1.01/lib/Module/CPANTS/Kwalitee/MetaYML.pm
new/Module-CPANTS-Analyse-1.02/lib/Module/CPANTS/Kwalitee/MetaYML.pm
--- old/Module-CPANTS-Analyse-1.01/lib/Module/CPANTS/Kwalitee/MetaYML.pm
2019-08-08 05:43:42.000000000 +0200
+++ new/Module-CPANTS-Analyse-1.02/lib/Module/CPANTS/Kwalitee/MetaYML.pm
2023-09-10 05:13:16.000000000 +0200
@@ -7,7 +7,7 @@
use CPAN::Meta::Converter;
use List::Util qw/first/;
-our $VERSION = '1.01';
+our $VERSION = '1.02';
$VERSION =~ s/_//; ## no critic
sub order { 10 }
@@ -109,6 +109,7 @@
my ($spec, $error) = _validate_meta($meta);
$me->d->{error}{meta_json_conforms_to_known_spec} = $error if $error;
$me->d->{meta_json_spec_version} = $spec->{spec};
+ $me->d->{meta_json} = $meta;
}
if (!$me->d->{meta_yml}) {
$me->d->{meta_yml} = $meta;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore'
old/Module-CPANTS-Analyse-1.01/lib/Module/CPANTS/Kwalitee/NeedsCompiler.pm
new/Module-CPANTS-Analyse-1.02/lib/Module/CPANTS/Kwalitee/NeedsCompiler.pm
--- old/Module-CPANTS-Analyse-1.01/lib/Module/CPANTS/Kwalitee/NeedsCompiler.pm
2019-08-08 05:43:42.000000000 +0200
+++ new/Module-CPANTS-Analyse-1.02/lib/Module/CPANTS/Kwalitee/NeedsCompiler.pm
2023-09-10 05:13:16.000000000 +0200
@@ -2,7 +2,7 @@
use warnings;
use strict;
-our $VERSION = '1.01';
+our $VERSION = '1.02';
$VERSION =~ s/_//; ## no critic
sub order { 200 }
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore'
old/Module-CPANTS-Analyse-1.01/lib/Module/CPANTS/Kwalitee/Pod.pm
new/Module-CPANTS-Analyse-1.02/lib/Module/CPANTS/Kwalitee/Pod.pm
--- old/Module-CPANTS-Analyse-1.01/lib/Module/CPANTS/Kwalitee/Pod.pm
2019-08-08 05:43:42.000000000 +0200
+++ new/Module-CPANTS-Analyse-1.02/lib/Module/CPANTS/Kwalitee/Pod.pm
2023-09-10 05:13:16.000000000 +0200
@@ -5,7 +5,7 @@
use Encode;
use Data::Binary qw/is_binary/;
-our $VERSION = '1.01';
+our $VERSION = '1.02';
$VERSION =~ s/_//; ## no critic
our @ABSTRACT_STUBS = (
@@ -24,18 +24,22 @@
sub analyse {
my ($class, $me) = @_;
my $distdir = $me->distdir;
- my %abstract;
my @errors;
- for my $module (@{$me->d->{modules} || []}) {
- my ($package, $abstract, $error, $has_binary_data) =
$class->_parse_abstract(catfile($distdir, $module->{file}));
- push @errors, "$error ($package)" if $error;
- $me->d->{abstracts_in_pod}{$package} = $abstract if $package;
- $me->d->{files_hash}{$module->{file}}{has_binary_data} = 1 if
$has_binary_data;
- }
- # sometimes pod for .pm file is put into .pod
+ my @files = map { $_->{file} } @{$me->d->{modules} || []};
+
for my $file (@{$me->d->{files_array} || []}) {
- next unless $file =~ /\.pod$/ && ($file =~ m!^lib/! or $file =~
m!^[^/]+$!);
+ # sometimes pod for .pm file is put into .pod
+ # and scripts may have abstract
+ if (
+ ( $file =~ /\.pod$/ && ($file =~ m!^lib/! or $file =~ m!^[^/]+$!) )
+ or $file =~ m!^(?:bin|scripts?)/!
+ ) {
+ push @files, $file;
+ }
+ }
+
+ for my $file (@files) {
local $@;
my ($package, $abstract, $error, $has_binary_data) =
$class->_parse_abstract(catfile($distdir, $file));
push @errors, "$error ($package)" if $error;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore'
old/Module-CPANTS-Analyse-1.01/lib/Module/CPANTS/Kwalitee/Prereq.pm
new/Module-CPANTS-Analyse-1.02/lib/Module/CPANTS/Kwalitee/Prereq.pm
--- old/Module-CPANTS-Analyse-1.01/lib/Module/CPANTS/Kwalitee/Prereq.pm
2019-08-08 05:43:42.000000000 +0200
+++ new/Module-CPANTS-Analyse-1.02/lib/Module/CPANTS/Kwalitee/Prereq.pm
2023-09-10 05:13:16.000000000 +0200
@@ -4,7 +4,7 @@
use File::Spec::Functions qw(catfile);
use Text::Balanced qw/extract_bracketed/;
-our $VERSION = '1.01';
+our $VERSION = '1.02';
$VERSION =~ s/_//; ## no critic
sub order { 100 }
@@ -24,9 +24,14 @@
$class->_from_dist_ini($me);
}
+sub _flatten_and_sort {
+ my $res = shift;
+ [sort {$a->{requires} cmp $b->{requires} or $a->{type} cmp $b->{type}} map
{@$_} values %$res];
+}
+
sub _from_meta {
my ($class, $me) = @_;
- my $meta = $me->d->{meta_yml};
+ my $meta = $me->d->{meta_yml}; # $me->d->{meta_json} || $me->d->{meta_yml};
return unless $meta && ref $meta eq ref {};
my $spec = $meta->{'meta-spec'};
@@ -63,7 +68,7 @@
}
return unless %res;
- $me->d->{prereq} = [sort {$a->{requires} cmp $b->{requires}} map {@$_}
values %res];
+ $me->d->{prereq} = _flatten_and_sort(\%res);
$me->d->{got_prereq_from} = 'META.yml';
}
@@ -78,7 +83,7 @@
my %res = $class->_handle_prereqs_v2($prereqs);
return unless %res;
- $me->d->{prereq} = [sort {$a->{requires} cmp $b->{requires}} map {@$_}
values %res];
+ $me->d->{prereq} = _flatten_and_sort(\%res);
$me->d->{got_prereq_from} = 'cpanfile';
}
@@ -120,7 +125,7 @@
$build_pl = $left;
}
- $me->d->{prereq} = [sort {$a->{requires} cmp $b->{requires}} map {@$_}
values %res];
+ $me->d->{prereq} = _flatten_and_sort(\%res);
$me->d->{got_prereq_from} = 'Build.PL';
}
@@ -186,7 +191,7 @@
}
}
}
- $me->d->{prereq} = [sort {$a->{requires} cmp $b->{requires}} map {@$_}
values %res];
+ $me->d->{prereq} = _flatten_and_sort(\%res);
$me->d->{got_prereq_from} = 'Makefile.PL';
}
@@ -283,7 +288,7 @@
};
}
}
- $me->d->{prereq} = [sort {$a->{requires} cmp $b->{requires}} map {@$_}
values %res];
+ $me->d->{prereq} = _flatten_and_sort(\%res);
$me->d->{got_prereq_from} = 'dist.ini';
}
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore'
old/Module-CPANTS-Analyse-1.01/lib/Module/CPANTS/Kwalitee/Repackageable.pm
new/Module-CPANTS-Analyse-1.02/lib/Module/CPANTS/Kwalitee/Repackageable.pm
--- old/Module-CPANTS-Analyse-1.01/lib/Module/CPANTS/Kwalitee/Repackageable.pm
2019-08-08 05:43:42.000000000 +0200
+++ new/Module-CPANTS-Analyse-1.02/lib/Module/CPANTS/Kwalitee/Repackageable.pm
2023-09-10 05:13:16.000000000 +0200
@@ -2,7 +2,7 @@
use warnings;
use strict;
-our $VERSION = '1.01';
+our $VERSION = '1.02';
$VERSION =~ s/_//; ## no critic
sub order { 900 }
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore'
old/Module-CPANTS-Analyse-1.01/lib/Module/CPANTS/Kwalitee/Signature.pm
new/Module-CPANTS-Analyse-1.02/lib/Module/CPANTS/Kwalitee/Signature.pm
--- old/Module-CPANTS-Analyse-1.01/lib/Module/CPANTS/Kwalitee/Signature.pm
2019-08-08 05:43:42.000000000 +0200
+++ new/Module-CPANTS-Analyse-1.02/lib/Module/CPANTS/Kwalitee/Signature.pm
2023-09-10 05:13:16.000000000 +0200
@@ -2,7 +2,7 @@
use strict;
use warnings;
-our $VERSION = '1.01';
+our $VERSION = '1.02';
$VERSION =~ s/_//; ## no critic
sub order { 100 }
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore'
old/Module-CPANTS-Analyse-1.01/lib/Module/CPANTS/Kwalitee/Uses.pm
new/Module-CPANTS-Analyse-1.02/lib/Module/CPANTS/Kwalitee/Uses.pm
--- old/Module-CPANTS-Analyse-1.01/lib/Module/CPANTS/Kwalitee/Uses.pm
2019-08-08 05:43:42.000000000 +0200
+++ new/Module-CPANTS-Analyse-1.02/lib/Module/CPANTS/Kwalitee/Uses.pm
2023-09-10 05:13:16.000000000 +0200
@@ -6,7 +6,7 @@
use List::Util 1.33 qw/none/;
use version;
-our $VERSION = '1.01';
+our $VERSION = '1.02';
$VERSION =~ s/_//; ## no critic
# These equivalents should be reasonably well-known and, preferably,
@@ -29,6 +29,7 @@
Moose::Util::TypeConstraints Moose::Util::MetaRole
MooseX::Declare MooseX::Role::Parameterized MooseX::Types
Mouse Mouse::Role
+ Object::Pad
perl5 perl5i::1 perl5i::2 perl5i::latest
Pegex::Base
Role::Tiny
@@ -228,6 +229,7 @@
my $d = shift;
my $files = $d->{files_hash} || {};
+ my $perl_version_with_implicit_use_warnings =
version->new('5.036')->numify;
my @no_warnings;
for my $file (keys %$files) {
next unless exists $files->{$file}{module};
@@ -236,6 +238,11 @@
next if $file =~ /\.pod$/;
my $module = $files->{$file}{module};
my $requires = $files->{$file}{requires} || {};
+ my $required_perl = $requires->{perl};
+ if (defined $required_perl) {
+ $required_perl =~ s/_//; # tweak 5.008_001 and the
likes for silence
+ next if version->parse($required_perl)->numify >=
$perl_version_with_implicit_use_warnings;
+ }
push @no_warnings, $module if none {exists
$requires->{$_}} (@WARNINGS_EQUIV, @STRICT_WARNINGS_EQUIV);
}
if (@no_warnings) {
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore'
old/Module-CPANTS-Analyse-1.01/lib/Module/CPANTS/Kwalitee/Version.pm
new/Module-CPANTS-Analyse-1.02/lib/Module/CPANTS/Kwalitee/Version.pm
--- old/Module-CPANTS-Analyse-1.01/lib/Module/CPANTS/Kwalitee/Version.pm
2019-08-08 05:43:42.000000000 +0200
+++ new/Module-CPANTS-Analyse-1.02/lib/Module/CPANTS/Kwalitee/Version.pm
2023-09-10 05:13:16.000000000 +0200
@@ -2,7 +2,7 @@
use warnings;
use strict;
-our $VERSION = '1.01';
+our $VERSION = '1.02';
$VERSION =~ s/_//; ## no critic
sub order { 100 }
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore'
old/Module-CPANTS-Analyse-1.01/lib/Module/CPANTS/Kwalitee.pm
new/Module-CPANTS-Analyse-1.02/lib/Module/CPANTS/Kwalitee.pm
--- old/Module-CPANTS-Analyse-1.01/lib/Module/CPANTS/Kwalitee.pm
2019-08-08 05:43:42.000000000 +0200
+++ new/Module-CPANTS-Analyse-1.02/lib/Module/CPANTS/Kwalitee.pm
2023-09-10 05:13:16.000000000 +0200
@@ -6,7 +6,7 @@
use Carp;
use Module::Find qw(usesub);
-our $VERSION = '1.01';
+our $VERSION = '1.02';
$VERSION =~ s/_//; ## no critic
__PACKAGE__->mk_accessors(qw(_available _total));
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Module-CPANTS-Analyse-1.01/t/analyse/manifest.t
new/Module-CPANTS-Analyse-1.02/t/analyse/manifest.t
--- old/Module-CPANTS-Analyse-1.01/t/analyse/manifest.t 2014-09-26
16:26:07.000000000 +0200
+++ new/Module-CPANTS-Analyse-1.02/t/analyse/manifest.t 2023-09-10
05:12:59.000000000 +0200
@@ -4,6 +4,13 @@
use lib "$FindBin::Bin/../lib";
use Module::CPANTS::TestAnalyse;
+my $no_symlinks;
+if ($^O eq 'MSWin32') {
+ plan skip_all => 'requires Test::File 1.993 to test' unless eval { require
Test::File; Test::File->VERSION(1.993) };
+
+ $no_symlinks = !Test::File::has_symlinks();
+}
+
test_distribution {
my ($mca, $dir) = @_;
write_file("$dir/MANIFEST", <<"EOF");
@@ -58,7 +65,7 @@
my $stash = $mca->run;
ok !$stash->{error}{symlinks}, "symlinks not listed in MANIFEST is ignored
for a local distribution";
-};
+} unless $no_symlinks;
test_distribution {
my ($mca, $dir) = @_;
@@ -75,6 +82,6 @@
my $stash = archive_and_analyse($dir,
"Module-CPANTS-Analyse-Test-0.01.tar.gz");
ok $stash->{error}{symlinks}, "symlinks not listed in MANIFEST is not
ignored for a non-local distribution";
-};
+} unless $no_symlinks;
done_testing;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Module-CPANTS-Analyse-1.01/t/analyse/pod.t
new/Module-CPANTS-Analyse-1.02/t/analyse/pod.t
--- old/Module-CPANTS-Analyse-1.01/t/analyse/pod.t 2014-09-26
16:26:07.000000000 +0200
+++ new/Module-CPANTS-Analyse-1.02/t/analyse/pod.t 2023-09-10
05:12:59.000000000 +0200
@@ -22,4 +22,22 @@
is $stash->{abstracts_in_pod}{'Module::CPANTS::Analyse::Test'} => 'test
abstract';
};
+test_distribution {
+ my ($mca, $dir) = @_;
+
+ my $content = join "\n\n", (
+ '=pod',
+ '=encoding utf-8;',
+ '=head1 NAME',
+ 'some-script - test abstract',
+ '=cut',
+ );
+
+ write_pmfile("$dir/bin/some-script", $content);
+
+ my $stash = $mca->run;
+ like $stash->{error}{has_abstract_in_pod} => qr/^unknown encoding: utf-8;/;
+ is $stash->{abstracts_in_pod}{'some-script'} => 'test abstract';
+};
+
done_testing;