Branch Coverage

File:C4/Koha.pm
Coverage:3.4%

line%coveragebranch
1290TFif not $codestring
1320TFif (not $advanced_search_types or $advanced_search_types eq 'itemtypes') { }
1840TFif (not $advanced_search_types or $advanced_search_types eq 'itemtypes') { }
2790TFif ($$data{'category'} eq 'CCODE')
4520TFif ($src eq 'intranet') { }
4610TFif ($src eq 'intranet') { }
4710TFif not $image
4760TFif $scheme
4980TFunless defined $directoryname
4990TFunless -d $directoryname
5010TFif (opendir my $dh, $directoryname) { }
5280TFunless defined $directoryname
5290TFunless -d $directoryname
5310TFif (opendir my $dh, $directoryname) { }
5320TFif -d 'File::Spec'->catfile($directoryname, $_)
5750TFif $DEBUG
5800TF"$imagesubdir/$thisimage" eq $checked ? :
5870TFif "$imagesubdir/$thisimage" eq $checked
6310TFunless $printer or $printer = $cookie{'printer'}
6320TFunless $$printers{$printer}
6620TFif ($type eq 'intranet') { }
6710TFif -d "$htdocs/$directory/en"
6780TFif ('C4::Context'->preference('marcflavour') eq 'UNIMARC') { }
7170TFunless 'C4::Context'->preference('singleBranchMode')
7660TFunless 'C4::Context'->preference('singleBranchMode')
8070TFif (defined $value_name) { }
9030TFif ($position)
9080TFif ($type)
9140TFif (@where_clauses)
9230TF$$data{'encoding'} ? :
9660TFunless $fwcode
9840TFunless $fwcode
9860TFif (defined $subfield) { }
10850TFunless $fwcode
10890TFif ($avcode) { }
10930TF$opac && $lib_opac ? :
11160TFunless $fwcode
11200TFif ($avcode) { }
11240TF$opac && $lib_opac ? :
1142100TFunless defined $str
11680TF$opac && $$data{'lib_opac'} ? :
11860TFif ($field->tag >= 10)
11970TFif ($marcflavour eq 'UNIMARC') { }
12010TFif ($upc ne '')
12120TFif ($indicator == 1 and $upc ne '')
12240TFif ($isbn)
12300TFunless $record
12320TFif ($marcflavour eq 'UNIMARC') { }
12360TFif ($isbn) { }
12470TFif ($isbn) { }
12600TFif ($marcflavour eq 'UNIMARC') { }
12640TFif ($ean ne '')
12740TFif ($indicator == 3 and $ean ne '')
12840TFif ($marcflavour eq 'UNIMARC') { }
12910TFif ($oclc =~ /OCoLC/) { }
131250TFif ($isbn)
13130TFif $isbn->type eq 'ISBN13'
131450TFif (defined $isbn)