| line |
true |
false |
branch |
|
134
|
1 |
123 |
unless $self->isa("UI::Various::container") |
|
142
|
1 |
126 |
unless $_->isa("UI::Various::widget") |
|
146
|
5 |
121 |
if (defined $parent) |
|
148
|
2 |
3 |
unless ($parent->remove($_)) |
|
157
|
34 |
86 |
unless defined $$self{"children"} |
|
193
|
1 |
100 |
unless $self->isa("UI::Various::container") |
|
203
|
1 |
100 |
unless $child->isa("UI::Various::widget") |
|
208
|
14 |
97 |
unless $children->[$_] eq $child |
|
214
|
60 |
37 |
if defined $$self{"_index"} and $_ < $$self{"_index"} |
|
302
|
1 |
534 |
unless $self->isa("UI::Various::container") |
|
308
|
20 |
514 |
if (defined $index and $index ne '') { } |
|
|
2 |
512 |
elsif (exists $_[1]) { } |
|
310
|
1 |
19 |
if (not $index =~ /^-?\d+$/u) { } |
|
|
18 |
1 |
elsif (exists $$self{'children'}[$index]) { } |
|
326
|
1 |
1 |
if defined $$self{"_index"} |
|
331
|
140 |
372 |
unless defined $$self{"_index"} |
|
332
|
373 |
139 |
if (exists $$self{'children'}[$$self{'_index'}]) { } |