File Coverage

blib/lib/Code/TidyAll/Plugin/Spellunker/Pod.pm
Criterion Covered Total %
statement 17 17 100.0
branch n/a
condition n/a
subroutine 5 5 100.0
pod n/a
total 22 22 100.0


line stmt bran cond sub pod time code
1             package Code::TidyAll::Plugin::Spellunker::Pod;
2 1     1   81113 use strict;
  1         4  
  1         23  
3 1     1   4 use warnings;
  1         2  
  1         18  
4              
5 1     1   407 use Moo;
  1         8937  
  1         4  
6              
7             extends 'Code::TidyAll::Plugin::Spellunker';
8              
9 1     1   1541 use Spellunker::Pod;
  1         72924  
  1         77  
10              
11             sub _check_source {
12 2     2   6 my ($self, $source) = @_;
13              
14 2         20 my $engine = Spellunker::Pod->new();
15 2         809927 $engine->add_stopwords(@{ $self->parsed_stopwords });
  2         96  
16 2         106 return $engine->check_text($source);
17             }
18              
19             1;
20             __END__