Login
Rename is_document_exempt() to prepare_to_scan_document().
[gknop/Perl-Critic.git] / lib / Perl / Critic / Policy / Modules / RequireExplicitPackage.pm
index 0e92148..235a6f6 100644 (file)
@@ -43,10 +43,10 @@ sub default_maximum_violations_per_document { return 1; }
 
 #-----------------------------------------------------------------------------
 
-sub is_document_exempt {
+sub prepare_to_scan_document {
     my ( $self, $document ) = @_;
 
-    return $self->{_exempt_scripts} && is_script($document);
+    return ! $self->{_exempt_scripts} || ! is_script($document);
 }
 
 sub violates {