[licensecheck] 75/112: Drop no longer used internal license shortname list.

Jonas Smedegaard dr at jones.dk
Fri Nov 25 22:02:02 UTC 2016


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

js pushed a commit to branch master
in repository licensecheck.

commit da2d383d8a6733a85cbc856ec4c95b67ff101c97
Author: Jonas Smedegaard <dr at jones.dk>
Date:   Tue Nov 22 10:11:20 2016 +0100

    Drop no longer used internal license shortname list.
---
 lib/App/Licensecheck.pm | 7 -------
 1 file changed, 7 deletions(-)

diff --git a/lib/App/Licensecheck.pm b/lib/App/Licensecheck.pm
index ff5c67c..971a00e 100755
--- a/lib/App/Licensecheck.pm
+++ b/lib/App/Licensecheck.pm
@@ -54,10 +54,6 @@ See the script for casual usage.
 
 =cut
 
-# legacy descriptive names different from SPDX shortnames
-my %SPDX = (
-);
-
 my $under_terms_of
 	= qr/(?:(?:Licensed|released) under|(?:according to|under) the (?:conditions|terms) of)/i;
 my $any_of       = qr/(?:any|one or more) of the following/i;
@@ -367,9 +363,6 @@ sub licensepatterns
 
 	my %list;
 
-	while ( my ( $key, $val ) = each %SPDX ) {
-		$list{caption}{$key} = $val;
-	}
 	while ( my ( $key, $val ) = each %Regexp::Pattern::License::RE ) {
 		if ($org) {
 			$list{name}{$key}    = $val->{ 'name.alt.org.' . $org };

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



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