[libsoftware-license-perl] 03/05: Refresh patches.

gregor herrmann gregoa at debian.org
Sun Feb 23 17:04:09 UTC 2014


This is an automated email from the git hooks/post-receive script.

gregoa pushed a commit to branch master
in repository libsoftware-license-perl.

commit e91aece1f4cd3c332247519fe907f383e721a10a
Author: gregor herrmann <gregoa at debian.org>
Date:   Sun Feb 23 17:59:31 2014 +0100

    Refresh patches.
---
 debian/patches/add_or_later_clause  | 14 +++++++-------
 debian/patches/artistic_1.0_summary |  2 +-
 debian/patches/backward-compat      | 14 +++++++++-----
 debian/patches/summary_method       | 30 +++++++++++++-----------------
 debian/patches/summary_test         |  6 +++---
 5 files changed, 33 insertions(+), 33 deletions(-)

diff --git a/debian/patches/add_or_later_clause b/debian/patches/add_or_later_clause
index 485a1ba..fd320e6 100644
--- a/debian/patches/add_or_later_clause
+++ b/debian/patches/add_or_later_clause
@@ -1,7 +1,7 @@
 Description: add or_later license parameter
 --- a/lib/Software/License.pm
 +++ b/lib/Software/License.pm
-@@ -75,9 +75,11 @@
+@@ -160,9 +160,11 @@
    Carp::confess "couldn't build $which section" unless
      my $template = $self->section_data($which);
  
@@ -16,7 +16,7 @@ Description: add or_later license parameter
  }
 --- a/lib/Software/LicenseUtils.pm
 +++ b/lib/Software/LicenseUtils.pm
-@@ -137,6 +137,13 @@
+@@ -183,6 +183,13 @@
    'Artistic'   =>  'Software::License::Artistic_1_0',
    'Artistic-1' =>  'Software::License::Artistic_1_0',
    'Artistic-2' =>  'Software::License::Artistic_2_0',
@@ -29,8 +29,8 @@ Description: add or_later license parameter
 +  'LGPL-3.0+'  =>  [ 'Software::License::LGPL_3_0', or_later => 1 ],
  );
  
- 
-@@ -149,10 +156,12 @@
+ # =method new_from_short_name
+@@ -207,10 +214,12 @@
    Carp::croak "Unknow license with short name $short"
      unless $short_name{$short};
  
@@ -66,9 +66,9 @@ Description: add or_later license parameter
 +
 +}
 +{
-+my $license = $class->new_from_short_name({ 
-+    short_name => 'LGPL-2+', 
-+    holder => 'X. Ample' 
++my $license = $class->new_from_short_name({
++    short_name => 'LGPL-2+',
++    holder => 'X. Ample'
 +});
 +
 +is($license->holder, 'X. Ample', '(c) holder');
diff --git a/debian/patches/artistic_1.0_summary b/debian/patches/artistic_1.0_summary
index d9b44f2..6df6c35 100644
--- a/debian/patches/artistic_1.0_summary
+++ b/debian/patches/artistic_1.0_summary
@@ -1,7 +1,7 @@
 Description: added summary
 --- a/lib/Software/License/Artistic_1_0.pm
 +++ b/lib/Software/License/Artistic_1_0.pm
-@@ -75,6 +75,12 @@
+@@ -97,6 +97,12 @@
  =cut
  
  __DATA__
diff --git a/debian/patches/backward-compat b/debian/patches/backward-compat
index 81fca8e..9006801 100644
--- a/debian/patches/backward-compat
+++ b/debian/patches/backward-compat
@@ -4,12 +4,16 @@ Description: ensure backward compatibility
  This patch should be dropped once the reverse deps are adapted to the new API.
 --- a/lib/Software/License.pm
 +++ b/lib/Software/License.pm
-@@ -11,10 +11,17 @@
+@@ -8,6 +8,8 @@
  use Sub::Install ();
  use Text::Template ();
  
 +use Software::LicenseUtils;
- 
++
+ # =head1 SYNOPSIS
+ #
+ #   my $license = Software::License::Discordian->new({
+@@ -31,6 +33,12 @@
  sub new {
    my ($class, $arg) = @_;
  
@@ -40,9 +44,9 @@ Description: ensure backward compatibility
 +
 +# test backward compat form
 +{
-+my $license = Software::License->new({ 
-+    short_name => 'LGPL-2+', 
-+    holder => 'X. Ample' 
++my $license = Software::License->new({
++    short_name => 'LGPL-2+',
++    holder => 'X. Ample'
 +});
 +
 +is($license->holder, 'X. Ample', '(c) holder');
diff --git a/debian/patches/summary_method b/debian/patches/summary_method
index 895b4b7..92e92ef 100644
--- a/debian/patches/summary_method
+++ b/debian/patches/summary_method
@@ -1,29 +1,25 @@
 Description: new method
 --- a/lib/Software/License.pm
 +++ b/lib/Software/License.pm
-@@ -27,6 +27,11 @@
+@@ -68,6 +68,21 @@
  
  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');
 +}
- 
- sub license { shift->_fill_in('LICENSE') }
- 
-@@ -163,6 +168,13 @@
- C<meta_name> returns open_source, restricted, unrestricted, or unknown, that
- value will be used.
- 
-+=head2 summary
-+
-+This method returns a summary of the license. This summary must contains
-+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.
 +
- =head1 LOOKING UP LICENSE CLASSES
- 
- If you have an entry in a F<META.yml> or F<META.json> file, or similar
+ # =method license
+ #
+ # This method returns the full text of the license.
diff --git a/debian/patches/summary_test b/debian/patches/summary_test
index 1ffd9ad..0383fb5 100644
--- a/debian/patches/summary_test
+++ b/debian/patches/summary_test
@@ -14,9 +14,9 @@ Description: new test for summary feature
 +require_ok($class);
 +
 +{
-+my $license = $class->new_from_short_name({ 
-+    short_name => 'LGPL-2', 
-+    holder => 'X. Ample' 
++my $license = $class->new_from_short_name({
++    short_name => 'LGPL-2',
++    holder => 'X. Ample'
 +});
 +
 +is($license->holder, 'X. Ample', '(c) holder');

-- 
Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/pkg-perl/packages/libsoftware-license-perl.git



More information about the Pkg-perl-cvs-commits mailing list