[licensecheck] 50/112: Fix avoid detection of GPL/LGPL fulltext (rarely if ever used as grant).

Jonas Smedegaard dr at jones.dk
Fri Nov 25 22:01:49 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 e91dcde6dc6ddf56278e0c331a7bafdcafb06367
Author: Jonas Smedegaard <dr at jones.dk>
Date:   Wed Nov 23 21:17:59 2016 +0100

    Fix avoid detection of GPL/LGPL fulltext (rarely if ever used as grant).
---
 lib/App/Licensecheck.pm | 8 ++++++++
 1 file changed, 8 insertions(+)

diff --git a/lib/App/Licensecheck.pm b/lib/App/Licensecheck.pm
index dd7cbfb..67bf3da 100755
--- a/lib/App/Licensecheck.pm
+++ b/lib/App/Licensecheck.pm
@@ -549,6 +549,14 @@ sub parse_license
 
 	# GPL
 	given ($licensetext) {
+		# exclude GPL fulltext (rarely if ever used as grant)
+		when ( /Copyright \(C\) (?:19|yy)yy <?name of author>?\s+This program is free software/ ) {
+			break;
+		}
+		# exclude LGPL-3 fulltext (rarely if ever used as grant)
+		when ( /under the GNU GPL,? with none of the additional permissions of this License/ ) {
+			break;
+		}
 		# exclude AGPL-3 license
 		when ( /GNU Affero General Public License/ ) {
 			break;

-- 
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