Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with
or
.
Download ZIP
Browse files

Merge branch 'master' of git@github.com:petdance/perl-critic-bangs

  • Loading branch information...
commit 49fa32d835377955a381ca2fbd8510b41487c5ba 2 parents afa0d89 + ffac61b
@petdance authored
View
6 lib/Perl/Critic/Policy/Bangs/ProhibitFlagComments.pm
@@ -20,9 +20,9 @@ sub supported_parameters {
);
}
-sub default_severity { return $SEVERITY_LOW }
-sub default_themes { return qw( bangs maintenance ) }
-sub applies_to { return 'PPI::Token::Comment' }
+sub default_severity { return $SEVERITY_LOW }
+sub default_themes { return qw( bangs maintenance ) }
+sub applies_to { return qw( PPI::Token::Comment PPI::Token::Pod ) }
#---------------------------------------------------------------------------
View
20 t/Bangs/ProhibitFlagComments.run
@@ -15,3 +15,23 @@ my $XXX = 'foo';
# XXX I need to fix this comment
#-----------------------------------------------------------------------------
+
+## name Flags in POD
+## failures 1
+## cut
+
+=head1 SYNOPSIS
+
+FIXME: needs a description
+
+=over 4
+
+=item one
+
+TODO
+
+=back
+
+=cut
+
+#-----------------------------------------------------------------------------
Please sign in to comment.
Something went wrong with that request. Please try again.