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') { }
7220TFunless 'C4::Context'->preference('singleBranchMode')
7720TFunless 'C4::Context'->preference('singleBranchMode')
8130TFif (defined $value_name) { }
9090TFif ($position)
9140TFif ($type)
9200TFif (@where_clauses)
9290TF$$data{'encoding'} ? :
9720TFunless $fwcode
9900TFunless $fwcode
9920TFif (defined $subfield) { }
10910TFunless $fwcode
10950TFif ($avcode) { }
10990TF$opac && $lib_opac ? :
11220TFunless $fwcode
11260TFif ($avcode) { }
11300TF$opac && $lib_opac ? :
1148100TFunless defined $str
11740TF$opac && $$data{'lib_opac'} ? :
11920TFif ($field->tag >= 10)
12030TFif ($marcflavour eq 'UNIMARC') { }
12070TFif ($upc ne '')
12180TFif ($indicator == 1 and $upc ne '')
12300TFif ($isbn)
12360TFunless $record
12380TFif ($marcflavour eq 'UNIMARC') { }
12420TFif ($isbn) { }
12530TFif ($isbn) { }
12660TFif ($marcflavour eq 'UNIMARC') { }
12700TFif ($ean ne '')
12800TFif ($indicator == 3 and $ean ne '')
12900TFif ($marcflavour eq 'UNIMARC') { }
12970TFif ($oclc =~ /OCoLC/) { }
131850TFif ($isbn)
13190TFif $isbn->type eq 'ISBN13'
132050TFif (defined $isbn)