...
 
Commits (3)
......@@ -31,7 +31,7 @@ Build-Depends-Indep: licensecheck (>= 3.0.29),
libtext-levenshteinxs-perl,
libuniversal-require-perl,
libyaml-libyaml-perl,
libsoftware-license-perl
libsoftware-licensemoreutils-perl
Standards-Version: 4.1.4
Vcs-Browser: https://salsa.debian.org/perl-team/modules/packages/license-reconcile
Vcs-Git: https://salsa.debian.org/perl-team/modules/packages/license-reconcile.git
......
......@@ -50,11 +50,11 @@ Debian::LicenseReconcile - compare actual and required copyright and license
=head1 VERSION
Version 0.15
Version 0.16
=cut
our $VERSION = '0.15';
our $VERSION = '0.16';
=head1 SYNOPSIS
......
......@@ -244,11 +244,11 @@ Debian::LicenseReconcile::App - encapsulate the application code
=head1 VERSION
Version 0.15
Version 0.16
=cut
our $VERSION = '0.15';
our $VERSION = '0.16';
=head1 SYNOPSIS
......
......@@ -214,11 +214,11 @@ Debian::LicenseReconcile::CopyrightDatum - copyright data as an object
=head1 VERSION
Version 0.15
Version 0.16
=cut
our $VERSION = '0.15';
our $VERSION = '0.16';
=head1 DESCRIPTION
......
......@@ -61,11 +61,11 @@ Debian::LicenseReconcile::CopyrightDatum::Holder - encapsulate pair
=head1 VERSION
Version 0.15
Version 0.16
=cut
our $VERSION = '0.15';
our $VERSION = '0.16';
=head1 SYNOPSIS
......
......@@ -100,11 +100,11 @@ Debian::LicenseReconcile::CopyrightTarget - file patterns mapped to Debian copyr
=head1 VERSION
Version 0.15
Version 0.16
=cut
our $VERSION = '0.15';
our $VERSION = '0.16';
=head1 SYNOPSIS
......
......@@ -29,11 +29,11 @@ Debian::LicenseReconcile::Errors - list of license reconciliation errors
=head1 VERSION
Version 0.15
Version 0.16
=cut
our $VERSION = '0.15';
our $VERSION = '0.16';
=head1 SYNOPSIS
......
......@@ -91,11 +91,11 @@ Debian::LicenseReconcile::Filter - abstract interface to license info
=head1 VERSION
Version 0.15
Version 0.16
=cut
our $VERSION = '0.15';
our $VERSION = '0.16';
=head1 SYNOPSIS
......
......@@ -76,11 +76,11 @@ Debian::LicenseReconcile::Filter::ChangeLog - parses changelog
=head1 VERSION
Version 0.15
Version 0.16
=cut
our $VERSION = '0.15';
our $VERSION = '0.16';
=head1 SYNOPSIS
......
......@@ -57,11 +57,11 @@ Debian::LicenseReconcile::Filter::Rules - applies licensecheck to get data
=head1 VERSION
Version 0.15
Version 0.16
=cut
our $VERSION = '0.15';
our $VERSION = '0.16';
=head1 SYNOPSIS
......
......@@ -32,11 +32,11 @@ Debian::LicenseReconcile::Filter::Shebang - applies licensecheck to probable scr
=head1 VERSION
Version 0.15
Version 0.16
=cut
our $VERSION = '0.15';
our $VERSION = '0.16';
=head1 SYNOPSIS
......
......@@ -17,11 +17,11 @@ Debian::LicenseReconcile::Filter::Std - applies licensecheck to get data
=head1 VERSION
Version 0.15
Version 0.16
=cut
our $VERSION = '0.15';
our $VERSION = '0.16';
=head1 SYNOPSIS
......
......@@ -20,11 +20,11 @@ Debian::LicenseReconcile::FormatSpec - check format is recognized
=head1 VERSION
Version 0.15
Version 0.16
=cut
our $VERSION = '0.15';
our $VERSION = '0.16';
=head1 SYNOPSIS
......
......@@ -196,11 +196,11 @@ Debian::LicenseReconcile::LicenseCheck - wrapper around licensecheck
=head1 VERSION
Version 0.15
Version 0.16
=cut
our $VERSION = '0.15';
our $VERSION = '0.16';
=head1 SYNOPSIS
......
......@@ -26,11 +26,11 @@ Debian::LicenseReconcile::Utils - various just about describable utilities
=head1 VERSION
Version 0.15
Version 0.16
=cut
our $VERSION = '0.15';
our $VERSION = '0.16';
=head1 SYNOPSIS
......
......@@ -6,7 +6,7 @@ use Test::NoWarnings;
use Debian::LicenseReconcile::LicenseCheck;
use Readonly;
use File::Temp qw();
use Software::License;
use Software::LicenseMoreUtils;
use Data::Dumper;
require UNIVERSAL::require;
......@@ -46,15 +46,14 @@ my $dir = File::Temp->newdir('t/slgenXXXXX');
my $year = 2000;
foreach my $license (@LICENSES) {
my $slfile = $dir->dirname . "/$license";
my $module = "Software::License::$license";
$module->require;
my $slobj = $module->new({
my $slobj = Software::LicenseMoreUtils->new_from_short_name({
holder => 'Testophilus Testownik <tester@testity.org>',
year=>$year,
short_name => $license,
});
open my $fh, '>', $slfile;
print $fh $slobj->notice;
print $fh $slobj->debian_text;
print $fh $slobj->summary_or_text;
close $fh;
++$year;
}
......