Commit 22a33a12 authored by Dominique Dumont's avatar Dominique Dumont

refreshed patches

parent 1ac468eb
Description: add or_later license parameter
--- a/lib/Software/License.pm
+++ b/lib/Software/License.pm
@@ -160,9 +160,11 @@
@@ -151,9 +151,11 @@
Carp::confess "couldn't build $which section" unless
my $template = $self->section_data($which);
......@@ -29,7 +29,7 @@ Description: add or_later license parameter
+ 'LGPL-3.0+' => [ 'Software::License::LGPL_3_0', or_later => 1 ],
);
# =method new_from_short_name
#pod =method new_from_short_name
@@ -207,10 +214,12 @@
Carp::croak "Unknow license with short name $short"
unless $short_name{$short};
......
......@@ -10,9 +10,9 @@ Description: ensure backward compatibility
+use Software::LicenseUtils;
+
# =head1 SYNOPSIS
#
# my $license = Software::License::Discordian->new({
#pod =head1 SYNOPSIS
#pod
#pod my $license = Software::License::Discordian->new({
@@ -31,6 +33,12 @@
sub new {
my ($class, $arg) = @_;
......
Description: new method
--- a/lib/Software/License.pm
+++ b/lib/Software/License.pm
@@ -68,6 +68,21 @@
@@ -68,6 +68,12 @@
sub notice { shift->_fill_in('NOTICE') }
+# =method summary
+#
+# This method returns a summary of the license. This summary must
+# refer to a file containing the whole license. On Debian system, the file
+# containing the whole license will be in C</usr/share/common-licenses/>
+# directory.
+#
+# =cut
+
+sub summary {
+ my ($self,$distro) = @_;
+ $distro ||= 'debian' ;
+ $self->_fill_in(uc($distro).'-SUMMARY');
+}
+
# =method license
#
# This method returns the full text of the license.
#pod =method license
#pod
#pod This method returns the full text of the license.
@@ -253,6 +259,13 @@
copyright holder and year of copyright, as well as an indication of the license
under which the software is distributed.
+=head2 summary
+
+This method returns a summary of the license. This summary must
+refer to a file containing the whole license. On Debian system, the file
+containing the whole license will be in C</usr/share/common-licenses/>
+directory.
+
=head2 license
This method returns the full text of the license.
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment