| line |
!l |
l&&!r |
l&&r |
condition |
|
370
|
72 |
27 |
0 |
$self->location and $args{'config_file'}
|
|
458
|
0 |
0 |
0 |
defined $args{'case'} and $args{'case'} eq "any"
|
|
532
|
0 |
8389 |
72 |
!defined($type) || $type eq $elt_type and !defined($cargo_type) || $cargo_type eq $elt_cargo
|
|
555
|
37 |
1 |
201 |
defined $element && $element
|
|
564
|
0 |
642 |
201 |
defined $element and $element eq $name
|
|
649
|
20990 |
24 |
4 |
$element_level eq "hidden" and not $accept_hidden
|
|
672
|
20932 |
62 |
19 |
$self->{'status'}{$element_name} eq "deprecated" and $check eq "yes"
|
|
761
|
5029 |
37 |
0 |
$element_status ne "standard" and $element_status ne $status
|
|
796
|
0 |
0 |
26 |
$has_tld and $element_list
|
|
|
0 |
12 |
14 |
$has_tld and $element_list and @$element_list
|
|
878
|
2 |
3 |
1 |
$elt->get_type ne 'leaf' || $get_obj and not defined $new_path
|
|
994
|
131 |
0 |
0 |
%$perl_data and $check eq "yes"
|
| line |
l |
!l |
condition |
|
94
|
4 |
0 |
$self->gist // ""
|
|
95
|
8 |
0 |
$self->grab($1)->fetch // ""
|
|
169
|
3712 |
0 |
$args{'check'} || 'yes'
|
|
175
|
0 |
1 |
$self->location || 'configuration root'
|
|
253
|
49 |
2763 |
delete $element_info->{'class'} || 'Config::Model::Value'
|
|
434
|
2877 |
1263 |
$args{'autoadd'} // 1
|
|
481
|
0 |
0 |
$self->location || 'configuration root'
|
|
523
|
2095 |
145 |
$args{'check'} || 'yes'
|
|
628
|
5693 |
15335 |
$args{'accept_hidden'} || 0
|
|
629
|
2669 |
18359 |
$args{'autoadd'} // 1
|
|
870
|
2 |
5 |
delete $args{'get_obj'} || 0
|
|
1007
|
0 |
154 |
delete $args{'full_dump'} || 0
|
|
1010
|
0 |
0 |
$args{'mode'} //= "user"
|
|
1051
|
24 |
3 |
$args{'check'} || 'yes'
|
|
1065
|
7 |
72 |
$self->{$tag}{$elt_name} // ""
|
|
1068
|
4 |
40 |
$self->{'description'}{$tag} // ""
|
|
1070
|
1 |
0 |
$self->{'model'}{'class_description'} // ""
|
| line |
l |
!l&&r |
!l&&!r |
condition |
|
289
|
4 |
585 |
0 |
delete $element_info->{'class'} || 'Config::Model::' . $id_class_hash{$type}
|
|
327
|
186 |
8370 |
0 |
delete $self->{'model'}{'element'}{$elt_name}{$prop} // get_default_property($prop)
|
|
355
|
0 |
93 |
0 |
$self->{'backend_mgr'} ||= "Config::Model::BackendMgr"->new("config_dir", $self->instance->config_dir, "node", $self, "rw_config", $model->{'rw_config'})
|
|
380
|
6 |
12 |
81 |
$args{'config_file'} || $self->{'config_file'}
|
|
|
0 |
0 |
99 |
$args{'auto_create'} || $self->instance->auto_create
|
|
412
|
11140 |
9756 |
0 |
$self->location || $self->config_class_name
|
|
479
|
12569 |
1 |
0 |
$self->{'model'}{'element'}{$name} // $self->_get_accepted_data($name)
|
|
527
|
8517 |
0 |
0 |
$self->{'status'}{$elt} || get_default_property('status')
|
|
528
|
54 |
2 |
8461 |
$status eq "deprecated" or $status eq "obsolete"
|
|
532
|
8461 |
0 |
0 |
!defined($type) || $type eq $elt_type
|
|
|
8299 |
36 |
126 |
!defined($cargo_type) || $cargo_type eq $elt_cargo
|
|
579
|
31395 |
0 |
0 |
$self->{$prop}{$elt} || get_default_property($prop)
|
|
586
|
242 |
0 |
0 |
$args{'value'} || croak(q[set_element_property:: missing 'value' parameter])
|
|
609
|
32355 |
0 |
0 |
$args{'element'} || croak("${method_name}: missing 'element' parameter")
|
|
611
|
32355 |
0 |
0 |
$args{'property'} || croak("${method_name}: missing 'property' parameter")
|
|
650
|
0 |
0 |
4 |
$check eq "no" or $check eq "skip"
|
|
664
|
0 |
0 |
1 |
$check eq "no" or $check eq "skip"
|
|
878
|
3 |
1 |
2 |
$elt->get_type ne 'leaf' || $get_obj
|
|
897
|
196 |
214 |
0 |
defined $args{'step'} or defined $args{'steps'}
|
|
913
|
0 |
0 |
131 |
not defined $raw_perl_data or ref $raw_perl_data ne "HASH"
|
|
944
|
331 |
0 |
0 |
$self->is_element_available("name", $elt) or $check eq "no"
|
|
1050
|
27 |
0 |
0 |
$args{'from'} || croak('copy_from: missing from argument')
|