| line |
true |
false |
branch |
|
168
|
0 |
1 |
if $self->oPerlySense->dirFindLookingAround('.git', $self->dirProject, ['.'])
|
|
175
|
0 |
1 |
if -d dir($self->dirProject, '.svn')
|
|
208
|
13 |
48 |
if $file
|
|
209
|
61 |
0 |
if $dir
|
|
213
|
8 |
53 |
if $dir and $oProject = $pkg->newFindExplicit('dir', $dir, 'oPerlySense', $oPerlySense)
|
|
221
|
5 |
48 |
if ($file and my $oDocument = $oPerlySense->oDocumentParseFile($file))
|
|
226
|
2 |
0 |
if ($dirFound)
|
|
237
|
51 |
0 |
if ($dir)
|
|
242
|
51 |
0 |
if ($dirFound)
|
|
255
|
2 |
49 |
if $dirProject eq '/'
|
|
283
|
8 |
48 |
if (my $dirProject = $oPerlySense->dirFindLookingAround('.PerlySenseProject', $dir, ['.']))
|
|
376
|
0 |
5 |
unless my $rsDirRunFrom = $hTypeDirRunFrom{$typeRunFrom}
|
|
386
|
0 |
5 |
unless my $command = $rhConfigType->{$keyConfigCommand} || $rhConfigType->{'command'}
|
|
422
|
2 |
31 |
unless my $rex = $rhConfigType->{'rex'}
|
|
424
|
13 |
18 |
if eval {
do {
$file =~ /$rex/
}
}
|
|
425
|
2 |
16 |
if $@
|
|
449
|
0 |
771 |
unless $self->oPerlySense->rhConfig->{'project'}{'inc_dir'}
|
|
474
|
0 |
544 |
unless $self->oPerlySense->rhConfig->{'project'}{'inc_dir'}
|
|
501
|
0 |
7 |
unless $self->oPerlySense->rhConfig->{'project'}{'inc_dir'}
|
|
515
|
4 |
12 |
if $dirProject->subsumes($dirFileAbsolute)
|
|
539
|
0 |
0 |
if ($self->oPerlySense->rhConfig->{'external'}{'editor'}{'emacs'}{'flymake'}{'syntax'})
|
|
554
|
0 |
0 |
if ($self->oPerlySense->rhConfig->{'external'}{'editor'}{'emacs'}{'flymake'}{'critic'})
|
|
562
|
0 |
0 |
unless -e $fileConfigCritic
|
|
602
|
0 |
0 |
if $@
|
|
610
|
0 |
0 |
unless -d $dirDb
|
|
646
|
0 |
0 |
if $@
|
|
655
|
0 |
0 |
if $file =~ /\.pm$/
|
|
656
|
0 |
0 |
if $file =~ m[/t/]
|
|
657
|
0 |
0 |
if $file =~ /\.t$/
|
|
685
|
0 |
0 |
if $@
|
|
691
|
0 |
0 |
unless my $fileConfig = 'File::Corresponding::Config::Find'->new('preferred_dirs', [dir('.PerlySenseProject'), dir('.')])->user_config('.corresponding_file')
|
|
697
|
0 |
0 |
unless eval {
do {
$corresponding->load_config_file($fileConfig)
}
}
|