| line |
true |
false |
branch |
|
48
|
0 |
17 |
if $class->metadm->{'singleton'} |
|
81
|
0 |
86 |
if ref $class |
|
91
|
16 |
807 |
if (not $metadm->{'singleton'}) { } |
|
|
0 |
807 |
elsif (@_) { } |
|
93
|
0 |
16 |
if exists $metadm->{'singleton'} |
|
114
|
31 |
300 |
unless ref $self |
|
117
|
26 |
305 |
if (@_ > 1) |
|
120
|
3 |
23 |
if &does($dbh, "ARRAY") and not keys %dbh_options |
|
125
|
0 |
3 |
unless not $self->{'dbh'} or $self->{'dbh'}[0]{'AutoCommit'} |
|
127
|
24 |
2 |
if ($dbh) { } |
|
129
|
0 |
24 |
unless $dbh->isa("DBI::db") |
|
134
|
0 |
24 |
unless $dbh->{'RaiseError'} |
|
137
|
24 |
0 |
unless (exists $dbh_options{'returning_through'}) |
|
139
|
0 |
24 |
if (/^Oracle/) |
|
140
|
0 |
24 |
if (/^Pg/) |
|
154
|
58 |
273 |
wantarray ? : |
|
167
|
0 |
1459 |
unless ref $self |
|
169
|
62 |
1397 |
if (@_) |
|
179
|
0 |
0 |
unless ref $self |
|
191
|
1 |
2 |
unless ref $self |
|
193
|
1 |
2 |
unless @components |
|
206
|
3 |
0 |
unless ref $self |
|
209
|
0 |
3 |
unless $self->{'transaction_dbhs'} |
|
216
|
25 |
0 |
unless ref $self |
|
218
|
0 |
25 |
unless &does($coderef, "CODE") |
|
226
|
2 |
23 |
if @new_dbh |
|
231
|
0 |
25 |
unless my $dbh = $self->dbh |
|
235
|
12 |
5 |
defined wantarray ? : |
|
|
8 |
17 |
wantarray ? : |
|
250
|
15 |
10 |
if ($dbh->{'AutoCommit'}) |
|
259
|
12 |
13 |
if (@$transaction_dbhs) { } |
|
266
|
0 |
13 |
if ($dbh->isa("DBIx::RetryOverDisconnects::db")) |
|
277
|
0 |
13 |
unless $dbh->{'AutoCommit'} |
|
292
|
0 |
5 |
if ($dbh->isa("DBIx::RetryOverDisconnects::db") and $dbh->is_trans_disconnect) |
|
296
|
0 |
0 |
if $retry < $n_retries |
|
325
|
2 |
30 |
wantarray ? : |
|
339
|
90 |
11 |
unless ref $self |
|
341
|
2 |
98 |
unless my $meta_source = $self->metadm->$remote(@_) |
|
355
|
0 |
206 |
if ($debug) |
|
356
|
0 |
0 |
if (ref $debug and $debug->can('debug')) { } |
|
387
|
3 |
0 |
if (exists $previous_state->{'dbh'}) |
|
409
|
0 |
4 |
@rollback_errs ? : |