line |
true |
false |
branch |
167
|
1 |
0 |
if $self->oPerlySense->dirFindLookingAround('.git', $self->dirProject, ['.'])
|
174
|
0 |
0 |
if -d dir($self->dirProject, '.svn')
|
207
|
12 |
47 |
if $file
|
208
|
59 |
0 |
if $dir
|
212
|
52 |
7 |
if $dir and $oProject = $pkg->newFindExplicit('dir', $dir, 'oPerlySense', $oPerlySense)
|
220
|
4 |
3 |
if ($file and my $oDocument = $oPerlySense->oDocumentParseFile($file))
|
225
|
2 |
0 |
if ($dirFound)
|
236
|
5 |
0 |
if ($dir)
|
241
|
3 |
2 |
if ($dirFound)
|
254
|
0 |
3 |
if $dirProject eq '/'
|
282
|
52 |
2 |
if (my $dirProject = $oPerlySense->dirFindLookingAround('.PerlySenseProject', $dir, ['.']))
|
375
|
0 |
5 |
unless my $rsDirRunFrom = $hTypeDirRunFrom{$typeRunFrom}
|
382
|
0 |
5 |
unless my $command = $$rhConfigType{$keyConfigCommand} || $$rhConfigType{'command'}
|
420
|
2 |
31 |
unless my $rex = $$rhConfigType{'rex'}
|
423
|
13 |
18 |
if eval {
do {
$file =~ /$rex/
}
}
|
424
|
2 |
16 |
if $@
|
448
|
0 |
717 |
unless $self->oPerlySense->rhConfig->{'project'}{'inc_dir'}
|
472
|
0 |
534 |
unless $self->oPerlySense->rhConfig->{'project'}{'inc_dir'}
|
499
|
0 |
7 |
unless $self->oPerlySense->rhConfig->{'project'}{'inc_dir'}
|
514
|
4 |
12 |
if $dirProject->subsumes($dirFileAbsolute)
|
538
|
0 |
0 |
if ($self->oPerlySense->rhConfig->{'external'}{'editor'}{'emacs'}{'flymake'}{'syntax'})
|
553
|
0 |
0 |
if ($self->oPerlySense->rhConfig->{'external'}{'editor'}{'emacs'}{'flymake'}{'critic'})
|
561
|
0 |
0 |
unless -e $fileConfigCritic
|
601
|
0 |
0 |
if $@
|
609
|
0 |
0 |
unless -d $dirDb
|
645
|
0 |
0 |
if $@
|
654
|
0 |
0 |
if $file =~ /\.pm$/
|
655
|
0 |
0 |
if $file =~ m[/t/]
|
656
|
0 |
0 |
if $file =~ /\.t$/
|
684
|
0 |
0 |
if $@
|
690
|
0 |
0 |
unless my $fileConfig = 'File::Corresponding::Config::Find'->new('preferred_dirs', [dir('.PerlySenseProject'), dir('.')])->user_config('.corresponding_file')
|
696
|
0 |
0 |
unless eval {
do {
$corresponding->load_config_file($fileConfig)
}
}
|