| line |
true |
false |
branch |
|
241
|
31 |
0 |
unless $caller->can('form_builder_defaults') |
|
251
|
0 |
0 |
if (my $post_processor = delete $args{'post_process'} || $form->__cdbi_original_args__->{'post_process'}) { } |
|
257
|
0 |
0 |
ref $post_processor eq 'CODE' ? : |
|
304
|
0 |
31 |
if ($args{'BePoliteToFromForm'}) { } |
|
707
|
0 |
0 |
if ref $p eq 'CODE' |
|
709
|
0 |
0 |
unless ($coderef) |
|
711
|
0 |
0 |
unless $p->require |
|
713
|
0 |
0 |
unless UNIVERSAL::can($p, 'field') |
|
729
|
0 |
0 |
ref $field ? : |
|
733
|
0 |
0 |
ref $field ? : |
|
762
|
0 |
0 |
unless $next |
|
764
|
0 |
0 |
if ref $next eq 'CODE' |
|
766
|
0 |
0 |
ref $next eq 'ARRAY' ? : |
|
778
|
0 |
0 |
if ref $processor eq 'CODE' |
|
783
|
0 |
0 |
if $p |
|
786
|
0 |
0 |
if ($processor =~ /^\+SET_VALUE\(\s*(.*)\s*\)$/) |
|
801
|
0 |
0 |
if ($processor =~ /^(?:\+?)SET_(\w+)\(\s*(.*)\s*\)$/) |
|
823
|
0 |
0 |
if ref $processor |
|
826
|
0 |
0 |
unless $processor->require |
|
842
|
0 |
0 |
ref $field ? : |
|
851
|
0 |
0 |
unless $auto |
|
852
|
0 |
0 |
unless $custom |
|
860
|
0 |
0 |
unless $name =~ /^\+/ |
|
885
|
0 |
0 |
unless $next |
|
888
|
0 |
0 |
if ref $next eq 'CODE' |
|
892
|
0 |
0 |
if (ref $next eq 'ARRAY') |
|
898
|
0 |
0 |
if ref $next |
|
905
|
0 |
0 |
if (my $foo = $me->field_processors->{$next}) |
|
907
|
0 |
0 |
if ref $foo eq 'CODE' |
|
946
|
0 |
0 |
unless $related_class |
|
948
|
0 |
0 |
unless ref $them |
|
954
|
0 |
0 |
if $@ |
|
959
|
0 |
0 |
unless @related_objects |
|
960
|
0 |
0 |
if @related_objects == 1 |
|
1203
|
0 |
0 |
unless $skip_validation |
|
1207
|
0 |
0 |
wantarray ? : |
|
1229
|
0 |
0 |
unless $args{'required'} |
|
1232
|
0 |
0 |
unless exists $form->field->{$field} |
|
1235
|
0 |
0 |
if $field =~ /$regexp/ |
|
1237
|
0 |
0 |
if $field->options |
|
1239
|
0 |
0 |
unless $force_required{$field} |
|
1241
|
0 |
0 |
if $field->type eq 'textarea' |
|
1261
|
0 |
0 |
if (my $order_by = delete $args{$order_by_field_name}) |
|
1263
|
0 |
0 |
if $_->type ne 'hidden' |
|
1264
|
0 |
0 |
unless ref $order_by |
|
1277
|
0 |
0 |
if (ref $cmp) { } |
|
1294
|
0 |
0 |
if (my $cmp_field = $fields{$cmp_field_name}) { } |
|
1305
|
0 |
0 |
if (my $order_by_field = $fields{$order_by_field_name}) { } |
|
1338
|
0 |
0 |
unless $them->form_builder_defaults->{'options_sorters'} |
|
|
0 |
0 |
unless delete $args_in{'options_sorters'} |
|
1347
|
0 |
0 |
$args{'fields'} ? : |
|
1354
|
0 |
0 |
ref $_ ? : |
|
1356
|
0 |
0 |
unless $args{'keepextras'} and $args{'keepextras'} == 1 |
|
1359
|
0 |
0 |
if (ref $them) |
|
1365
|
0 |
0 |
ref $_ ? : |
|
1370
|
0 |
0 |
if $@ |
|
1380
|
0 |
0 |
unless $post_process{'post_process'} |
|
1428
|
0 |
0 |
ref $_ ? : |
|
1431
|
0 |
0 |
ref $_ ? : |
|
1435
|
0 |
0 |
defined $_ ? : |
|
1493
|
0 |
0 |
unless $related |
|
1495
|
0 |
0 |
ref $related eq 'ARRAY' ? : |
|
1508
|
0 |
0 |
if @$show_related |
|
1518
|
0 |
0 |
unless $them->meta_info('has_many') |
|
1536
|
0 |
0 |
unless ref $them |
|
1554
|
0 |
0 |
unless $$args{'labels'}{$related_field_name} |
|
1567
|
0 |
0 |
if $parent_field->name eq $field_name |
|
1574
|
0 |
0 |
if ($rel_type eq 'has_a') { } |
|
|
0 |
0 |
elsif ($rel_type eq 'is_a') { } |
|
1619
|
0 |
0 |
unless ref $them |
|
1624
|
0 |
0 |
if grep {/\./;} @pk |
|
1635
|
0 |
0 |
unless $fake_field_name =~ /PKDATA_(.+)_PKDATA/ |
|
1658
|
0 |
0 |
unless $class |
|
1684
|
0 |
0 |
unless %pk |
|
1728
|
0 |
0 |
unless ref $them |
|
1757
|
0 |
0 |
unless exists $form->field->{$field->mutator} |
|
1793
|
0 |
0 |
unless exists $form->field->{$field->mutator} |
|
1801
|
0 |
0 |
if $processor |
|
1802
|
0 |
0 |
if $processor |
|
1808
|
0 |
0 |
if ($related_class->isa('Class::DBI')) { } |
|
1815
|
0 |
0 |
if (ref $them) |
|
1820
|
0 |
0 |
unless (defined $related_object or $nullable) |
|
1827
|
0 |
0 |
if defined $related_object |
|
1829
|
0 |
0 |
if defined $related_object |
|
1832
|
0 |
0 |
$nullable ? : |
|
1846
|
0 |
0 |
if (eval {
do {
$class->can('field')
}
} or $class->require) { } |
|
1896
|
0 |
0 |
if $processor |
|
1897
|
0 |
0 |
if $processor |
|
1904
|
0 |
0 |
if (ref $them) |
|
1911
|
0 |
0 |
unless $related_class |
|
1921
|
0 |
0 |
unless ref $obj eq $related_class |
|
1959
|
0 |
0 |
if $processor |
|
1960
|
0 |
0 |
if $processor |
|
1967
|
0 |
0 |
if (ref $them) |
|
1974
|
0 |
0 |
unless $related_class |
|
1980
|
0 |
0 |
if ($might_have_object) |
|
1982
|
0 |
0 |
unless ref $might_have_object eq $related_class |
|
1986
|
0 |
0 |
$might_have_object ? : |
|
2003
|
0 |
0 |
unless $rel =~ /^(?:has_many|might_have)$/ |
|
2012
|
0 |
0 |
unless $$form{'__cdbi_original_args__'}{'fields'} |
|
2027
|
0 |
0 |
unless $related_class |
|
2029
|
0 |
0 |
unless $related_class->isa('Class::DBI') |
|
2038
|
0 |
0 |
if $column_meta and $column_meta->is_nullable |
|
2045
|
0 |
0 |
if (my $sorter = $me->_get_options_sorter($them, $form, $field)) |
|
2080
|
0 |
0 |
unless exists $form->field->{$field->mutator} |
|
2082
|
0 |
0 |
unless $me->table_meta($them)->column_deep_type($field->name) eq 'timestamp' |
|
2102
|
0 |
0 |
unless exists $form->field->{$field->mutator} |
|
2104
|
0 |
0 |
unless $me->table_meta($them)->column_deep_type($field->name) eq 'text' |
|
2173
|
0 |
0 |
unless %process_extras |
|
2177
|
0 |
0 |
if exists $form->field->{$field} |
|
2181
|
0 |
0 |
unless $process_extras{$field} |
|
2205
|
0 |
0 |
unless my $final = $$pre_process{'__FINAL__'} |
|
2236
|
0 |
0 |
if ref $them |
|
2238
|
0 |
0 |
unless $form->submitted and $form->validate |
|
2259
|
0 |
0 |
unless exists $$data{$column->name} |
|
2278
|
0 |
0 |
if ref $them |
|
2280
|
0 |
0 |
unless $form->submitted and $form->validate |
|
2317
|
0 |
0 |
ref $proto ? : |
|
2319
|
0 |
0 |
unless $them |
|
2334
|
0 |
0 |
unless $fb->submitted and $fb->validate |
|
2370
|
0 |
0 |
unless $$has_many{$field} |
|
2373
|
0 |
0 |
unless $$has_many{$field}{'args'}{'mapping'} |
|
2383
|
0 |
0 |
if (grep {$rel->$mkey->id == $_;} $form->field($field)) { } |
|
2395
|
0 |
0 |
unless $rel_exists{$val} |
|
2431
|
0 |
0 |
if ref $them |
|
2440
|
0 |
0 |
unless $form->submitted and $form->validate |
|
2444
|
0 |
0 |
if $object |
|
2473
|
0 |
0 |
if ref $them |
|
2501
|
0 |
0 |
if ref $them |
|
2518
|
0 |
0 |
if ref $them |
|
2527
|
0 |
0 |
unless $form->submitted and $form->validate |
|
2541
|
0 |
0 |
if %search_modifiers |
|
2550
|
0 |
0 |
$fields ? : |
|
2561
|
0 |
0 |
@data > 1 ? : |
|
2586
|
0 |
0 |
if ref $them |
|
2596
|
0 |
0 |
unless $form->submitted and $form->validate |
|
2601
|
0 |
0 |
unless $search_data{$_} |
|
2615
|
0 |
0 |
unless (%search_data) |
|
2621
|
0 |
0 |
%search_modifiers ? : |
|
2636
|
0 |
0 |
if ref $them |
|
2645
|
0 |
0 |
unless $form->submitted and $form->validate |
|
2665
|
0 |
0 |
if ref $them |
|
2674
|
0 |
0 |
unless $form->submitted and $form->validate |
|
2678
|
0 |
0 |
if $object |
|
2707
|
0 |
0 |
unless %args |
|
2710
|
0 |
0 |
if $debug |
|
2715
|
0 |
0 |
if (exists $args{'validate'} and exists $args{'columns'}) |
|
2728
|
0 |
0 |
if (my(@unknown) = keys %args) |
|
2739
|
0 |
0 |
ref $field ? : |
|
2740
|
0 |
0 |
ref $field ? : |
|
2742
|
0 |
0 |
if $skip{$col_name} |
|
2745
|
0 |
0 |
if $$v_cols{$col_name} |
|
2758
|
0 |
0 |
if (ref $o eq 'ARRAY') |
|
2760
|
0 |
0 |
ref $_ eq 'ARRAY' ? : |
|
2763
|
0 |
0 |
unless ($o) |
|
2768
|
0 |
0 |
unless $column_meta |
|
2772
|
0 |
0 |
if $debug > 1 and @$o |
|
2774
|
0 |
0 |
unless @$o |
|
2779
|
0 |
0 |
unless $type |
|
2785
|
0 |
0 |
if $v |
|
2786
|
0 |
0 |
if $type =~ /$regex/ |
|
2791
|
0 |
0 |
if $v |
|
2792
|
0 |
0 |
if $col_name =~ /$regex/ |
|
2797
|
0 |
0 |
if $skip_ts and $debug > 1 |
|
2799
|
0 |
0 |
if $skip_ts |
|
2803
|
0 |
0 |
unless $v |
|
2806
|
0 |
0 |
$args{'strict'} ? : |
|
|
0 |
0 |
if $fail |
|
2809
|
0 |
0 |
unless $type2 eq $type |
|
2811
|
0 |
0 |
if $debug > 1 |
|
2814
|
0 |
0 |
if $v |
|
2819
|
0 |
0 |
if ($debug) |
|
2821
|
0 |
0 |
unless 'Data::Dumper'->require |
|
2822
|
0 |
0 |
ref $them ? : |
|
2837
|
0 |
0 |
unless $$fb_defaults{'validate'} |
|
|
0 |
0 |
unless $$fb_defaults{'auto_validate'} |
|
|
0 |
0 |
if (%{{} unless $$fb_defaults{'validate'};} and %{{} unless $$fb_defaults{'auto_validate'};}) |
|
2844
|
0 |
0 |
unless $$fb_defaults{'validate'} |
|
|
0 |
0 |
if %{{} unless $$fb_defaults{'validate'};} |