Branch Coverage

File:C4/Languages.pm
Coverage:18.9%

line%coveragebranch
870TFif not /^\.|CVS/
940TFif ($dirname eq $$language_set{'language_code'})
1260TFif ($interface and $interface eq 'opac') { }
0TFelsif ($interface and $interface eq 'intranet') { }
1290TFif ($theme and -d "$htdocs/$theme") { }
1410TFif ($theme and -d "$htdocs/$theme") { }
2060TFif ($native_description) { }
2080TFif $$language_descriptions{'description'}
23250TFif ($interface eq 'intranet') { }
242100TFif -d "$htdocs/$directory/en"
258100TFif $lang_string =~ /^\./
25950TFif $lang_string eq 'all'
26050TFif $lang_string =~ /png$/
26150TFif $lang_string =~ /css$/
26250TFif $lang_string =~ /CVS$/
26350TFif $lang_string =~ /\.txt$/i
264100TFif $lang_string =~ /img|images|famfam|sound|pdf/
2970TFif $translated_language eq $enabled_language
3010TFif $translated_language eq $current_language
3170TFif $key eq $$regex_enabled_language{'language'}
3190TF$$track_language_groups{$key} > 1 ? :
0TF$$current_language_regex{'language'} eq $key ? :
3430TFunless ($desc)
45550TFif ($clientPreferences) { }
4610TFif $quality
4620TFunless $quality
4630TFif $quality <= 0
4650TFif $language eq '*'
4810TFif ($subtag =~ /^([^-]+)-?/)
4900TFif (exists $supportedLanguages{$$tag{'lclanguage'}}) { }
0TFelsif (exists $secondaryLanguages{$$tag{'lclanguage'}}) { }
0TFelsif ($$tag{'lclanguage'} =~ /^([^-]+)-/ and exists $secondaryLanguages{$1} and $secondaryMatch eq '') { }
0TFelsif ($$tag{'lclanguage'} =~ /^([^-]+)-/ and exists $secondaryLanguages{$1} and $secondaryMatch eq '') { }
0TFelsif ($$tag{'lclanguage'} eq '*') { }
4920TFif exists $supportedLanguages{$$tag{'language'}}
4960TFif exists $secondaryLanguages{$$tag{'language'}}
51450TFif $secondaryMatch