Commits

Burak Gürsoy  committed 985f55c

Perl::Critic fixes

  • Participants
  • Parent commits eacc3f0

Comments (0)

Files changed (2)

File t/05-sub_html.t

 package MyParser;
 use base qw(MP3::M3U::Parser);
 
-sub _template {
+sub _template { ## no critic (ProhibitUnusedPrivateSubroutines)
    return <<'MP3M3UPARSERTEMPLATE';
 <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN"
    "http://www.w3.org/TR/html4/loose.dtd">

File t/06-sub_search.t

 package MyParser;
 use base qw( MP3::M3U::Parser );
 
-sub _search {
+sub _search { ## no critic (ProhibitUnusedPrivateSubroutines)
     my $self   = shift;
     my $path   = shift;
     my $id3    = shift;