---
gsv-eval.pl | 4 ++++
1 file changed, 4 insertions(+)
diff --git a/gsv-eval.pl b/gsv-eval.pl
index c575dfb..6dc36f4 100755
--- a/gsv-eval.pl
+++ b/gsv-eval.pl
@@ -610,6 +610,9 @@ sub detect_license
$text =~ /The above copyright notice and this permission notice shall
be included in all copies or substantial portions of the Software/
);
+ my $possible_json = ($text =~ /The Software shall be used for Good,
not Evil/ && $possible_x11);
+ $possible_x11 = 0 if $possible_json;
+
my $possible_perl = $text =~ /This library is free software; you can
redistribute it and\/or modify it under the same terms as Perl itself/;
my $possible_apache2 = (
@@ -660,6 +663,7 @@ sub detect_license
push @licenses, $possible_bsd if $possible_bsd;
push @licenses, "zlib" if $possible_zlib;
push @licenses, "X11/MIT" if $possible_x11;
+ push @licenses, "JSON (non-free)" if $possible_json;
push @licenses, "Perl" if $possible_perl;
push @licenses, "Apache2.0" if $possible_apache2;
push @licenses, "All permissive (autotools)" if
$possible_permissive_autotools;
--
2.1.4
