[licensecheck] 69/112: Add license pattern public_domain.

Jonas Smedegaard dr at jones.dk
Fri Nov 25 22:02:01 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 bd4c6f7e8234f9201d1ad82933e6fce3d1cfe415
Author: Jonas Smedegaard <dr at jones.dk>
Date:   Mon Oct 10 11:55:04 2016 +0200

    Add license pattern public_domain.
---
 lib/App/Licensecheck.pm       | 5 ++---
 lib/Regexp/Pattern/License.pm | 7 +++++++
 2 files changed, 9 insertions(+), 3 deletions(-)

diff --git a/lib/App/Licensecheck.pm b/lib/App/Licensecheck.pm
index 44971ca..720eafc 100755
--- a/lib/App/Licensecheck.pm
+++ b/lib/App/Licensecheck.pm
@@ -57,7 +57,6 @@ See the script for casual usage.
 # legacy descriptive names different from SPDX shortnames
 my %SPDX = (
 	'MS-PL'                => 'Ms-PL',
-	'public-domain'        => 'Public domain',
 );
 
 my $under_terms_of
@@ -844,8 +843,8 @@ sub parse_license
 
 	# public-domain
 	given ($licensetext) {
-		when ( /is in the public domain/i ) {
-			$gen_license->('public-domain');
+		when ( /is in $L{re}{public_domain}/i ) {
+			$gen_license->('public_domain');
 		}
 	}
 
diff --git a/lib/Regexp/Pattern/License.pm b/lib/Regexp/Pattern/License.pm
index ed00713..2a95aca 100644
--- a/lib/Regexp/Pattern/License.pm
+++ b/lib/Regexp/Pattern/License.pm
@@ -108,6 +108,8 @@ Patterns each covering a single license.
 
 =item * postgresql
 
+=item * public_domain
+
 =item * python
 
 =item * qpl
@@ -414,6 +416,11 @@ END
 		tags => ['mit'],
 		pat  => qr/$P{permission_use_fee_agree}/i,
 	},
+	public_domain => {
+		name    => 'public-domain',
+		caption => 'Public domain',
+		pat     => qr/$the?public domain/,
+	},
 	python => {
 		name    => 'Python',
 		caption => 'PSF',

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