| blib/lib/VCS/Lite/Repository.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 36 | 77 | 46.7 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 192 | 69 | 20 | 0 | $args{'recurse'} and $args{'recurse'} eq 'pre' |
| 200 | 69 | 0 | 20 | $args{'recurse'} and $args{'recurse'} ne 'pre' |
| 246 | 6 | 0 | 6 | $$self{'transactions'} and @{$$self{'transactions'};} |
| 352 | 10 | 0 | 7 | $gen and $$self{'generation'} |
| 10 | 7 | 0 | $gen and $$self{'generation'} and not $$self{'generation'}{$gen} | |
| 381 | 0 | 0 | 0 | $srcname and -d $srcname |
| 383 | 0 | 0 | 0 | exists $$dest{'parent'} and $$dest{'parent'} eq $srcpath |
| 389 | 0 | 0 | 0 | exists $$src{'parent'} and $$src{'parent'} eq $path |
| line | l | !l | condition |
|---|---|---|---|
| 101 | 6 | 6 | $$self{'transactions'} ||= [] |
| 145 | 1 | 1 | $$self{'transactions'} ||= [] |
| 188 | 34 | 3 | $args{'params'} ||= [] |
| 253 | 0 | 6 | $$self{'generation'} ||= {} |
| 263 | 0 | 6 | $$self{'latest'} ||= {} |
| 266 | 0 | 6 | $1 || '' |
| 304 | 0 | 5 | $$self{'baseline'} || 0 |
| 339 | 0 | 0 | $args{'generation'} || '' |
| 354 | 10 | 0 | $$self{'original_contents'} || [] |
| 360 | 7 | 10 | $gen ||= 0 |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 62 | 0 | 0 | 0 | $$repos{'contents'} ||= $$repos{'elements'} |
| 85 | 0 | 2 | 0 | not defined $dirs[-1] or $dirs[-1] eq '' |
| 94 | 1 | 0 | 12 | catdir($file) eq '..' or catdir($file) eq '.' |
| 1 | 0 | 12 | catdir($file) eq '..' or catdir($file) eq '.' or grep {$file eq $_;} @{$$self{'contents'};} | |
| 246 | 6 | 0 | 6 | $$self{'transactions'} and @{$$self{'transactions'};} or $args{'check_in_anyway'} |
| 251 | 0 | 0 | 6 | $args{'generation'} || $self->latest |
| 281 | 2 | 0 | 0 | $$self{'parent'} || catdir($parent, $repos_name) |
| 283 | 2 | 0 | 0 | $$self{'parent_store'} || $$self{'store'} |
| 292 | 2 | 0 | 0 | $$self{'parent'} || catdir($parent, $repos_name) |
| 301 | 5 | 0 | 0 | $$self{'parent'} ||= catdir($srep, $repos_name) |
| 422 | 0 | 34 | 0 | $args{'path'} || $$self{'path'} |