| line |
true |
false |
branch |
|
26
|
0 |
0 |
if ($args{'setup'}) |
|
34
|
0 |
0 |
unless $obj and ref $obj eq "CPAN::SQLite::Index::$table" |
|
50
|
0 |
0 |
unless ($self->create_objs) |
|
54
|
0 |
0 |
unless ($self->state_info) |
|
69
|
0 |
0 |
if ($index and ref $index eq "CPAN::SQLite::Index::$table") { } |
|
71
|
0 |
0 |
if ($table ne 'info') |
|
72
|
0 |
0 |
unless has_hash_data($info) |
|
86
|
0 |
0 |
if ref $obj eq $tbl2obj{$_} |
|
102
|
0 |
0 |
unless ($obj->$method) |
|
103
|
0 |
0 |
if (my $error = $obj->{'error_msg'}) { } |
|
115
|
0 |
0 |
if (my $obj = $self->{'obj'}{'info'}) |
|
116
|
0 |
0 |
unless $obj->state |
|
128
|
0 |
0 |
unless has_hash_data($info) |
|
130
|
0 |
0 |
unless $cdbi and ref $cdbi eq 'CPAN::SQLite::DBI::Index::auths' |
|
149
|
0 |
0 |
unless ($self->{'ids'} = $cdbi->fetch_ids) |
|
159
|
0 |
0 |
unless my $dist_obj = $self->{'obj'}{'dists'} |
|
164
|
0 |
0 |
if (has_hash_data($dist_insert)) |
|
168
|
0 |
0 |
if (my $auth_id = $auth_ids->{$cpanid}) { } |
|
175
|
0 |
0 |
if (has_hash_data($dist_update)) |
|
178
|
0 |
0 |
if (my $auth_id = $auth_ids->{$cpanid}) { } |
|
197
|
0 |
0 |
unless has_hash_data($info) |
|
199
|
0 |
0 |
unless $cdbi and ref $cdbi eq 'CPAN::SQLite::DBI::Index::dists' |
|
220
|
0 |
0 |
unless (($self->{'ids'}, $self->{'versions'}) = $cdbi->fetch_ids) |
|
235
|
0 |
0 |
if (defined $reindex) |
|
236
|
0 |
0 |
ref $reindex eq 'ARRAY' ? : |
|
239
|
0 |
0 |
unless (defined $id) |
|
250
|
0 |
0 |
if (not defined $dist_versions->{$distname}) { } |
|
|
0 |
0 |
elsif (vcmp($dists->{$distname}{'dist_vers'}, $dist_versions->{$distname}) > 0) { } |
|
259
|
0 |
0 |
if $dists->{$distname} |
|
274
|
0 |
0 |
unless has_hash_data($info) |
|
276
|
0 |
0 |
unless $cdbi and ref $cdbi eq 'CPAN::SQLite::DBI::Index::mods' |
|
295
|
0 |
0 |
unless ($self->{'ids'} = $cdbi->fetch_ids) |
|
305
|
0 |
0 |
unless my $dist_obj = $self->{'obj'}{'dists'} |
|
312
|
0 |
0 |
if (has_hash_data($dist_insert)) |
|
319
|
0 |
0 |
if (has_hash_data($dist_update)) |
|
323
|
0 |
0 |
if ($mod_id) { } |
|
332
|
0 |
0 |
if (has_hash_data($dist_update)) |
|
334
|
0 |
0 |
unless (my $sth = $CPAN::SQLite::State::dbh->prepare($sql)) |
|
343
|
0 |
0 |
unless ($sth->execute($dist_ids->{$distname})) |
|
349
|
0 |
0 |
if $mods{$mod_name} |
|
370
|
0 |
0 |
unless $cdbi and ref $cdbi eq 'CPAN::SQLite::DBI::Index::info' |