| line |
true |
false |
branch |
|
61
|
0 |
0 |
if (@_ > 1)
|
|
73
|
32 |
1064 |
if (@_)
|
|
143
|
0 |
0 |
if (@_)
|
|
155
|
0 |
52 |
if defined $self->{'required'}
|
|
156
|
20 |
32 |
if defined $self->{'is_required'}
|
|
158
|
0 |
32 |
unless my $meta = $self->parent
|
|
167
|
0 |
32 |
unless my $column = $meta->column($column_name)
|
|
172
|
32 |
0 |
unless ($column->not_null)
|
|
187
|
0 |
52 |
if ($self->with_column_triggers)
|
|
192
|
0 |
0 |
if ($method)
|
|
194
|
0 |
0 |
unless my $meta = $self->parent
|
|
205
|
0 |
0 |
unless (defined $column->builtin_trigger_index('on_set', $trigger_name))
|
|
215
|
0 |
0 |
if $self->{'disable_column_triggers'}
|
|
217
|
0 |
0 |
unless defined $obj->$accessor
|
|
229
|
32 |
32 |
if ($type eq 'get_set' or $type eq 'get_set_now' or $type eq 'get_set_on_save') { }
|
|
|
32 |
0 |
elsif ($type eq 'delete_now' or $type eq 'delete_on_save') { }
|
|
260
|
0 |
112 |
unless (ref $key_columns eq 'HASH' and keys %$key_columns)
|
|
273
|
0 |
100 |
unless $self->sanity_check
|
|
286
|
0 |
100 |
unless $self->class->isa('Rose::DB::Object')
|
|
290
|
0 |
100 |
unless my $fk_meta = $self->class->meta
|
|
298
|
0 |
100 |
unless ($fk_meta->column($column_name))
|
|
304
|
48 |
52 |
unless ($fk_meta->column_accessor_method_name($column_name) and $fk_meta->column_mutator_method_name($column_name))
|
|
316
|
48 |
52 |
if ($error)
|
|
318
|
0 |
48 |
if ($Debug or $Rose::DB::Object::Metadata::Debug)
|
|
325
|
0 |
48 |
unless UNIVERSAL::isa($error, 'Rose::DB::Object::Exception::ClassNotReady')
|
|
328
|
48 |
52 |
$error ? :
|
|
339
|
0 |
0 |
$meta ? :
|
|
|
0 |
0 |
defined $args{'indent'} ? :
|
|
342
|
0 |
0 |
$meta ? :
|
|
|
0 |
0 |
defined $args{'braces'} ? :
|
|
345
|
0 |
0 |
defined $args{'inline'} ? :
|
|
346
|
0 |
0 |
defined $args{'inline'} ? :
|
|
359
|
0 |
0 |
if (keys %$key_columns > 1)
|
|
370
|
0 |
0 |
if length $name > $max_len
|
|
371
|
0 |
0 |
if length $name < $min_len or $min_len < 0
|
|
374
|
0 |
0 |
if (defined $name_padding and $name_padding > 0) { }
|
|
422
|
0 |
0 |
if (exists $map->{$key}) { }
|
|
424
|
0 |
0 |
unless my $spec_key = $map->{$key}
|
|
434
|
0 |
0 |
if $spec{'rel_type'} eq $self->init_relationship_type
|
|
436
|
0 |
0 |
wantarray ? :
|
|
443
|
0 |
0 |
unless ($object->isa($self->parent->class))
|