blib/lib/DBIx/Changeset/Record.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 13 | 14 | 92.8 |
line | true | false | branch |
---|---|---|---|
58 | 2 | 31 | unless defined $$params{'uri'} |
61 | 56 | 0 | if $self->can($field) |
73 | 10 | 1 | if ($file =~ m[^/\*.*?tag:\s*(\S+)]mx) { } |
89 | 2 | 2 | unless defined $data |
92 | 2 | 2 | if ($data =~ m[^/\*.*?tag:\s*(\S+)]mx) { } |
160 | 32 | 96 | if ($key eq 'id' or $key eq 'valid') |
162 | 9 | 23 | unless (defined $value) |