| line |
true |
false |
branch |
|
97
|
0 |
234 |
unless defined $type |
|
102
|
0 |
9 |
unless (ref $node eq 'ARRAY') |
|
109
|
0 |
71 |
unless (ref $node eq 'ARRAY') |
|
120
|
2124 |
0 |
if (defined $len) { } |
|
123
|
0 |
2124 |
if $len < 0 |
|
132
|
0 |
0 |
$_ ? : |
|
135
|
0 |
0 |
if (keys %$params) |
|
139
|
0 |
0 |
wantarray ? : |
|
146
|
1 |
1 |
unless $name =~ /^[a-z]\w*$/i |
|
147
|
1 |
0 |
$widget->{'cf_name'} ? : |
|
148
|
0 |
1 |
unless my $argdecl = $widget->{'arg_dict'}{$name} |
|
151
|
0 |
1 |
$argdecl->type->[0] eq 'list' ? : |
|
162
|
0 |
1 |
unless my $pkg = $f->{'cf_entns'} |
|
182
|
0 |
7 |
unless (@args) |
|
187
|
0 |
7 |
if (@$base) |
|
195
|
0 |
7 |
unless $type == 8 |
|
198
|
0 |
7 |
unless nonempty(my $fn = $vfs->node_value($att)) |
|
201
|
2 |
5 |
if ($vfs->{'on_memory'}) { } |
|
202
|
0 |
2 |
unless my $o = $vfs->find_file($fn) |
|
206
|
0 |
5 |
unless defined(my $realfn = $vfs->resolve_path_from($tmpl, $fn)) |
|
209
|
0 |
5 |
unless -e $realfn |
|
220
|
0 |
0 |
if $state->{'cf_path'} |
|
221
|
0 |
0 |
if $state->{'startln'} |
|
240
|
0 |
254 |
unless -e $fn |
|
254
|
0 |
449 |
$self->{'cf_parse_while_loading'} ? : |
|
265
|
0 |
0 |
unless open my $fh, '>', \(my $str = '') |
|
273
|
0 |
55 |
unless ($part->public) |
|
279
|
10 |
0 |
do {
ref $args eq 'ARRAY'
} ? : |
|
|
10 |
45 |
defined $args && $part->isa('YATT::Lite::Core'->Widget) ? : |
|
289
|
0 |
55 |
if (@opts) { } |
|
302
|
0 |
0 |
if (UNIVERSAL::isa($self->{'root'}, 'YATT::Lite::Core::Template')) { } |
|
306
|
0 |
0 |
unless $tmpl = $self->find_file($name) or $ignore_error and return |
|
312
|
0 |
0 |
wantarray ? : |
|
318
|
69 |
67 |
ref $nameSpec ? : |
|
329
|
1 |
135 |
if (UNIVERSAL::isa($self->{'root'}, 'YATT::Lite::Core::Template')) { } |
|
333
|
0 |
0 |
unless $part = $tmpl->{'Item'}{$partName} or $ignore_error and return |
|
341
|
0 |
0 |
unless $tmpl = $self->find_file($partName) or $ignore_error and return |
|
344
|
2 |
0 |
unless $part = $tmpl->{'Item'}{$itemKey} || $self->find_part_from($tmpl, $itemKey) or $ignore_error and return |
|
350
|
0 |
0 |
unless my $pkg = $self->find_product('perl', $tmpl) or $ignore_error and return |
|
354
|
0 |
0 |
unless my $sub = $pkg->can($method) or $ignore_error and return |
|
388
|
11 |
1 |
unless my($part, $sub, $pkg) = $self->find_part_handler(@_) |
|
390
|
1 |
0 |
wantarray ? : |
|
402
|
0 |
382 |
ref $spec ? : |
|
404
|
210 |
172 |
unless ($tmpl->{'product'}{$type}) |
|
413
|
201 |
0 |
if (not $self->{'cf_debug_cgen'}) { } |
|
451
|
0 |
2 |
unless my YATT::Lite::Core::Template $tmpl = $self->find_file($name) |
|
462
|
0 |
3 |
if (my $obj = $dict->{$msgid}) { } |
|
466
|
1 |
2 |
if ($other_msgs and $other_msgs->[0]) { } |
|
484
|
0 |
227 |
if not defined $tmpl->{'cf_name'} and defined $tmpl->{'cf_path'} |
|
499
|
254 |
162 |
if ($tmpl->{'cf_path'}) { } |
|
|
158 |
4 |
elsif ($tmpl->{'cf_string'} and not $tmpl->{'cf_mtime'}) { } |
|
502
|
254 |
0 |
defined $mtime ? : |
|
537
|
7 |
227 |
$old_product ? : |
|
547
|
5 |
272 |
if $widget->{'arg_dict'}{$argName}->is_required |
|
560
|
1 |
74 |
unless $tmpl->{'cf_subroutes'} |