comment about modules simulating "use strict;"

daxim · Aug 10, 2009 · 86a3ed6 · 86a3ed6
1 parent 7d3abca
commit 86a3ed6
Showing 1 changed file with 2 additions and 0 deletions.
diff --git a/lib/Module/CPANTS/Kwalitee/Uses.pm b/lib/Module/CPANTS/Kwalitee/Uses.pm
@@ -81,6 +81,8 @@ sub kwalitee_indicators {
 
                 my ($strict)=$uses->{'strict'};
                 my ($moose)=$uses->{'Moose'};
+                #should also count Moose::Role, MooseX::Declare, Modern::Perl
+
                 #return 0 unless $strict;
                 my $total = $strict?$strict->{in_code}:0;
                 if ($moose) {