Branch Coverage

blib/lib/HTML/Widgets/NavMenu.pm
Criterion Covered Total %
branch 75 82 91.4


line true false branch
50 1 53 unless $self->current_host($args{"current_host"})
55 1 52 exists $args{'no_leading_dot'} ? :
99 1 55 if ($path_info eq '') { }
1 54 elsif ($path_info =~ m[//$]) { }
110 2 54 if (defined $redir_path)
130 814 393 $string =~ m[/$] ? :
175 15 451 if ($url_is_abs) { }
43 408 elsif ($host ne $self->current_host or $url_type eq 'full_abs') { }
401 7 elsif ($url_type eq 'rel') { }
6 1 elsif ($url_type eq 'site_abs') { }
245 38 315 if (exists $sub_contents->{'expand'})
255 18 20 if ($expand_val)
274 127 226 if (exists $sub_contents->{'subs'})
304 2 50 unless shift()
317 30 22 if ($branches[$i]->_num_subs) { }
325 19 10 if ($branches[$i]->_num_subs > $coords[$i] + 1)
331 3 19 if ($i == -1)
344 2 47 unless shift()
346 19 30 if (scalar @coords == 0) { }
23 7 elsif ($coords[$#coords] > 0) { }
371 45 85 unless shift()
373 19 111 if (scalar @coords == 0) { }
379 81 30 if (@coords == 1 and $coords[0] > 0)
383 0 81 if ($coords_stop)
398 45 1 unless shift()
400 21 25 if (not @coords or @coords == 1 and $coords[0] == 0) { }
430 92 1 unless ($coords)
491 52 596 unless ($self->_traversed_tree)
542 154 0 unless ($coords_stop)
544 10 144 unless (@$coords)
567 238 0 defined $node->url ? :
570 7 231 $node->url_is_abs ? :
588 0 238 $coords_stop ? :
154 84 if ($coords_stop ? scalar @$coords == 0 : scalar @$coords == 1 && $coords->[0] == 0)
603 0 154 if ($coords_stop)
633 19 6 @$coords == 1 ? :
0 25 $only_empty ? :
19 25 @$coords == 0 ? :
44 0 defined $coords ? :
676 63 113 if ($IS_TOP and $link_rel =~ /\A(?:prev|top|up)\z/ms)
682 110 66 if (defined $coords)