Branch Coverage

blib/lib/RT/Client/REST/Object.pm
Criterion Covered Total %
branch 50 116 43.1


line true false branch
23 0 20 if (@_ & 1)
31 2 18 if (defined $id)
33 0 2 if ($self->can("parent_id"))
37 0 0 if (defined $parent_id) { }
43 1 1 if ($self->autoget)
66 22 42 if (@_)
67 18 4 defined((&CORE::GLOBAL::caller(1))[3]) ? :
69 19 3 if ($settings->{'validation'} and $caller ne "RT::Client::REST::Object::from_form")
91 2 0 if ($self->autosync and $self->can("store") and "id" ne $method and "parent_id" ne $method and $caller ne "RT::Client::REST::Object::from_form")
105 8 55 if ($settings->{'list'}) { }
113 20 149 if ($settings->{'is_datetime'})
119 2 1 if (@_)
120 1 1 unless ($_[0]->isa("DateTime"))
138 9 160 if ($settings->{'list'})
146 0 1 unless (@_)
165 0 1 unless (@_)
194 2 1 if (exists $self->{'__dirty'})
211 0 1 if (exists $self->{'__dirty_cf'})
223 0 1 $all ? :
229 0 0 exists $attributes->{$attr}{'rest_name'} ? :
232 0 0 if (exists $attributes->{$attr}{'value2form'}) { }
0 0 elsif ($attributes->{$attr}{'list'}) { }
237 0 0 defined $self->$attr ? :
242 0 1 $all ? :
254 0 0 unless (@_)
260 0 0 unless ("HASH" eq ref $hash)
268 0 0 $i++ & 1 ? :
274 0 0 exists $attributes->{$attr}{'rest_name'} ? :
281 0 0 if ($key =~ m[^(?:cf|customfield)(?:-|\.\{)([#\s\w_:()?/-]+)])
285 0 0 if ($value =~ /,/)
293 0 0 unless (exists $rest2attr{$key})
300 0 0 if ($settings->{'is_datetime'} and $value eq "Not set")
304 0 0 if (exists $attributes->{$method}{'form2value'}) { }
0 0 elsif ($attributes->{$method}{'list'}) { }
338 1 0 if (defined $self->id) { }
362 0 3 if (@_ & 1)
379 0 0 unless $_->blessed and $_->can("rethrow")
381 0 0 if ($_->isa('RT::Clite::REST::Object::InvalidAttributeException')) { }
393 0 0 if (length $query) { }
405 0 2 delete $opts{'reverseorder'} ? :
408 0 0 unless $_->blessed and $_->can("rethrow")
410 0 0 if ($_->isa('RT::Client::REST::Object::InvalidAttributeException')) { }
430 0 2 unless $_->blessed and $_->can("rethrow")
432 0 2 if ($_->isa('RT::Client::REST::InvalidQueryException')) { }
456 0 2 unless (exists $attributes->{$attr})
466 0 2 exists $attributes->{$attr}{'rest_name'} ? :
473 8 22 unless (defined $self->rt)
479 8 14 unless (defined $self->id)
490 3 4 unless (defined $self->rt)
501 0 0 unless (@_)
507 0 0 if (@_)
518 0 0 unless (@_)
524 0 0 if ('HASH' eq ref $name) { }
532 0 0 if (@_)
544 18 50 if (@_)
546 7 11 unless (UNIVERSAL::isa($rt, "RT::Client::REST"))
559 1 1 unless (UNIVERSAL::isa($rt, "RT::Client::REST"))
582 0 38 if $self->autostore and $self->can("store")