[libsoftware-license-perl] 01/09: added a patch to fallback on unknown license short_name
dod at debian.org
dod at debian.org
Tue Sep 23 11:57:05 UTC 2014
This is an automated email from the git hooks/post-receive script.
dod pushed a commit to branch master
in repository libsoftware-license-perl.
commit e4504ef2cee53fd1ff06793d410c9ac5988c9314
Author: Dominique Dumont <dod at debian.org>
Date: Sat Sep 20 10:11:28 2014 +0200
added a patch to fallback on unknown license short_name
---
debian/patches/series | 1 +
debian/patches/short-name-fallback | 11 +++++++++++
2 files changed, 12 insertions(+)
diff --git a/debian/patches/series b/debian/patches/series
index b26871f..9a31955 100644
--- a/debian/patches/series
+++ b/debian/patches/series
@@ -10,3 +10,4 @@ lgpl-2-summary
summary_test
add_or_later_clause
backward-compat
+short-name-fallback
diff --git a/debian/patches/short-name-fallback b/debian/patches/short-name-fallback
new file mode 100644
index 0000000..705e43f
--- /dev/null
+++ b/debian/patches/short-name-fallback
@@ -0,0 +1,11 @@
+--- a/lib/Software/LicenseUtils.pm
++++ b/lib/Software/LicenseUtils.pm
+@@ -214,7 +214,7 @@
+ Carp::croak "Unknow license with short name $short"
+ unless $short_name{$short};
+
+- my $info = $short_name{$short} ;
++ my $info = $short_name{$short} || "Software::License::$short";
+ my @infos = ref $info ? @$info : ($info);
+ my $lic_file = my $lic_class = shift @infos;
+ $lic_file =~ s!::!/!g;
--
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