File Coverage

blib/lib/Git/Lint/Check/Commit/Whitespace.pm
Criterion Covered Total %
statement 9 16 56.2
branch 0 2 0.0
condition n/a
subroutine 3 5 60.0
pod 1 1 100.0
total 13 24 54.1


line stmt bran cond sub pod time code
1             package Git::Lint::Check::Commit::Whitespace;
2              
3 1     1   710 use strict;
  1         2  
  1         25  
4 1     1   4 use warnings;
  1         2  
  1         23  
5              
6 1     1   4 use parent 'Git::Lint::Check::Commit';
  1         3  
  1         5  
7              
8             our $VERSION = '0.015';
9              
10             my $check_name = 'trailing whitespace';
11              
12             sub check {
13 0     0 1   my $self = shift;
14 0           my $input = shift;
15              
16             my $match = sub {
17 0     0     my $line = shift;
18 0 0         return 1 if $line =~ /\s$/;
19 0           return;
20 0           };
21              
22 0           return $self->parse(
23             input => $input,
24             match => $match,
25             check => $check_name
26             );
27             }
28              
29             1;
30              
31             __END__