[SCM] Debian packaging of libsoftware-license-perl branch, master, updated. a60e861de56439ff3aae49a00109a8fa1ad07e49

[Dominique Dumont]

The following commit has been merged in the master branch:
commit a60e861de56439ff3aae49a00109a8fa1ad07e49
Author: Dominique Dumont <dod at debian.org>
Date:   Fri Sep 30 15:31:26 2011 +0200

    first stab at summary patches

diff --git a/debian/patches/artistic_1.0_summary b/debian/patches/artistic_1.0_summary
new file mode 100644
index 0000000..3bb71cd
--- /dev/null
+++ b/debian/patches/artistic_1.0_summary
@@ -0,0 +1,16 @@
+Description: added summary
+--- a/lib/Software/License/Artistic_1_0.pm
++++ b/lib/Software/License/Artistic_1_0.pm
+@@ -77,6 +77,12 @@
+ 
+ 
+ __DATA__
++__DEBIAN-SUMMARY__
++This program is free software; you can redistribute it and/or modify
++it under the terms of the Artistic License, which comes with Perl.
++
++On Debian systems, the complete text of the Artistic License can be
++found in '/usr/share/common-licenses/Artistic'.
+ __LICENSE__
+ The Artistic License
+ 
diff --git a/debian/patches/gpl-1-plus-class b/debian/patches/gpl-1-plus-class
new file mode 100644
index 0000000..22ebec6
--- /dev/null
+++ b/debian/patches/gpl-1-plus-class
@@ -0,0 +1,22 @@
+Description: new class to represent GPL-1+ clauses
+--- /dev/null
++++ b/lib/Software/License/GPL_1_plus.pm
+@@ -0,0 +1,18 @@
++use strict;
++use warnings;
++package Software::License::GPL_1_plus;
++
++use base 'Software::License::GPL_1';
++
++sub name { 'The GNU General Public License, Version 1 or later, February 1989' }
++
++1;
++__DATA__
++__DEBIAN-SUMMARY__
++This program is free software; you can redistribute it and/or modify
++it under the terms of the GNU General Public License as published by
++the Free Software Foundation; either version 1, or (at your option)
++any later version.
++
++On Debian systems, the complete text of version 1 of the GNU General
++Public License can be found in `/usr/share/common-licenses/GPL-1'.
diff --git a/debian/patches/gpl-1-summary b/debian/patches/gpl-1-summary
new file mode 100644
index 0000000..2758643
--- /dev/null
+++ b/debian/patches/gpl-1-summary
@@ -0,0 +1,17 @@
+Description: added summary
+--- a/lib/Software/License/GPL_1.pm
++++ b/lib/Software/License/GPL_1.pm
+@@ -40,6 +40,13 @@
+ 
+ 
+ __DATA__
++__DEBIAN-SUMMARY__
++This program is free software; you can redistribute it and/or modify
++it under the terms of the GNU General Public License as published by
++the Free Software Foundation; version 1, February 1989
++
++On Debian systems, the complete text of version 1 of the GNU General
++Public License can be found in `/usr/share/common-licenses/GPL-1'.
+ __LICENSE__
+                     GNU GENERAL PUBLIC LICENSE
+                      Version 1, February 1989
diff --git a/debian/patches/series b/debian/patches/series
new file mode 100644
index 0000000..f4ea42d
--- /dev/null
+++ b/debian/patches/series
@@ -0,0 +1,5 @@
+summary_method
+artistic_1.0_summary
+gpl-1-summary
+gpl-1-plus-class
+summary_test
diff --git a/debian/patches/summary_method b/debian/patches/summary_method
new file mode 100644
index 0000000..6584bee
--- /dev/null
+++ b/debian/patches/summary_method
@@ -0,0 +1,15 @@
+Description: new method
+--- a/lib/Software/License.pm
++++ b/lib/Software/License.pm
+@@ -27,6 +27,11 @@
+ 
+ sub notice { shift->_fill_in('NOTICE') }
+ 
++sub summary { 
++    my ($self,$distro) = @_;
++    $distro ||= 'debian' ;
++    $self->_fill_in(uc($distro).'-SUMMARY');
++}
+ 
+ sub license { shift->_fill_in('LICENSE') }
+ 
diff --git a/debian/patches/summary_test b/debian/patches/summary_test
new file mode 100644
index 0000000..3a33a09
--- /dev/null
+++ b/debian/patches/summary_test
@@ -0,0 +1,18 @@
+--- /dev/null
++++ b/t/summary.t
+@@ -0,0 +1,15 @@
++#!perl
++use strict;
++use warnings;
++
++use Test::More tests => 5;
++
++my $class = 'Software::License::GPL_1_plus';
++require_ok($class);
++
++my $license = $class->new({ holder => 'X. Ample' });
++
++is($license->holder, 'X. Ample', '(c) holder');
++like($license->fulltext, qr/general public/i, 'license text');
++like($license->summary, qr/later version/i, 'summary text');
++like($license->summary, qr/common-licenses/i, 'common-licenses found');

-- 
Debian packaging of libsoftware-license-perl