This is an automated email from the git hooks/post-receive script. js pushed a commit to branch master in repository licensecheck.
commit d5428b70620b3c70ff70e14145e964282cf86eec Author: Jonas Smedegaard <d...@jones.dk> Date: Wed Nov 23 17:51:42 2016 +0100 Add license pattern wtfpl. --- lib/App/Licensecheck.pm | 14 ++------------ lib/Regexp/Pattern/License.pm | 8 ++++++++ t/SPDX.t | 1 + t/SPDX/WTFPL.txt | 11 +++++++++++ t/grant.t | 7 +++++++ t/grant/WTFPL/COPYING.WTFPL | 12 ++++++++++++ 6 files changed, 41 insertions(+), 12 deletions(-) diff --git a/lib/App/Licensecheck.pm b/lib/App/Licensecheck.pm index 971a00e..f1204d2 100755 --- a/lib/App/Licensecheck.pm +++ b/lib/App/Licensecheck.pm @@ -974,18 +974,8 @@ sub parse_license # WTFPL given ($licensetext) { - when ( /Do What The Fuck You Want To Public License,? $L{re}{version}{-keep}/i ) { - $gen_license->( 'WTFPL', $1 ); - } - } - given ($licensetext) { - when ( /Do what The Fuck You Want To Public License/i ) { - $gen_license->('WTFPL'); - } - } - given ($licensetext) { - when ( /(License WTFPL|Under (the|a) WTFPL)/i ) { - $gen_license->('WTFPL'); + when ( /$L{re}{wtfpl},? $L{re}{version}{-keep}/i ) { + $gen_license->( 'wtfpl', $1 ); } } #>>> diff --git a/lib/Regexp/Pattern/License.pm b/lib/Regexp/Pattern/License.pm index 68d391e..1e3a91a 100644 --- a/lib/Regexp/Pattern/License.pm +++ b/lib/Regexp/Pattern/License.pm @@ -146,6 +146,8 @@ Patterns each covering a single license. =item * unicode_tou +=item * wtfpl + =item * zlib =item * zlib_acknowledgement @@ -552,6 +554,12 @@ END pat => qr/distribute all documents and files solely for informational/, }, + wtfpl => { + name => 'WTFPL', + caption => 'do What The Fuck you want to Public License', + pat => + qr/$the?(?:[Dd]o What The Fuck [Yy]ou [Ww]ant [Tt]o Public License|DO WHAT THE FUCK YOU WANT TO PUBLIC LICENSE(?: \(WTFPL\))?|WTFPL)/, + }, zlib => { name => 'Zlib', caption => 'zlib/libpng', diff --git a/t/SPDX.t b/t/SPDX.t index f3625a3..39bf954 100644 --- a/t/SPDX.t +++ b/t/SPDX.t @@ -23,6 +23,7 @@ my %Debian2SPDX = ( 'LGPL-2+' => 'LGPL-2.0', 'LGPL-2.1+' => 'LGPL-2.1', 'Python-2' => 'Python-2.0', + 'WTFPL-2' => 'WTFPL', ); path("t/SPDX")->visit( diff --git a/t/SPDX/WTFPL.txt b/t/SPDX/WTFPL.txt new file mode 100644 index 0000000..7a3094a --- /dev/null +++ b/t/SPDX/WTFPL.txt @@ -0,0 +1,11 @@ +DO WHAT THE FUCK YOU WANT TO PUBLIC LICENSE +Version 2, December 2004 + +Copyright (C) 2004 Sam Hocevar <s...@hocevar.net> + +Everyone is permitted to copy and distribute verbatim or modified copies of this license document, and changing it is allowed as long as the name is changed. + +DO WHAT THE FUCK YOU WANT TO PUBLIC LICENSE +TERMS AND CONDITIONS FOR COPYING, DISTRIBUTION AND MODIFICATION + + 0. You just DO WHAT THE FUCK YOU WANT TO. diff --git a/t/grant.t b/t/grant.t index 10e53a9..6c304d4 100644 --- a/t/grant.t +++ b/t/grant.t @@ -185,4 +185,11 @@ run_me( } ); +# WTFPL +run_me( + { license => 'WTFPL-1.0', + corpus => 'WTFPL/COPYING.WTFPL' + } +); + done_testing; diff --git a/t/grant/WTFPL/COPYING.WTFPL b/t/grant/WTFPL/COPYING.WTFPL new file mode 100644 index 0000000..c971e27 --- /dev/null +++ b/t/grant/WTFPL/COPYING.WTFPL @@ -0,0 +1,12 @@ +do What The Fuck you want to Public License + +Version 1.0, March 2000 +Copyright (C) 2000 Banlu Kemiyatorn (]d). +136 Nives 7 Jangwattana 14 Laksi Bangkok +Everyone is permitted to copy and distribute verbatim copies +of this license document, but changing it is not allowed. + +Ok, the purpose of this license is simple +and you just + +DO WHAT THE FUCK YOU WANT TO. -- Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/pkg-perl/packages/licensecheck.git _______________________________________________ Pkg-perl-cvs-commits mailing list Pkg-perl-cvs-commits@lists.alioth.debian.org http://lists.alioth.debian.org/cgi-bin/mailman/listinfo/pkg-perl-cvs-commits