| blib/lib/Catmandu/Plugin/Versioning.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 8 | 16 | 50.0 |
| line | true | false | branch |
|---|---|---|---|
| 56 | 0 | 0 | unless grep /^$version_key$/, @$keys |
| 95 | 3 | 0 | if (my $data = $self->get($id)) |
| 112 | 9 | 3 | if ($data = $self->version_bag->get($version_id)) |
| 115 | 3 | 0 | if ($data = $self->get($id) and $$data{$self->version_key} == $version) |
| 123 | 1 | 0 | if (my $data = $self->get_version($id, $version)) |
| 131 | 3 | 0 | if (my $data = $self->get($id)) |
| 133 | 3 | 0 | if ($version > 1) |
| 142 | 1 | 0 | if (my $data = $self->get_previous_version($id)) |