| line |
true |
false |
branch |
|
30
|
0 |
0 |
scalar(@_) % 2 == 0 ? :
|
|
40
|
0 |
0 |
if defined $up->{'dbdir'}
|
|
84
|
0 |
0 |
unless ($up->{'backup'})
|
|
94
|
0 |
0 |
unless DiaColloDB::Utils::copyto_a("$dbdir/header.json", $backd)
|
|
123
|
0 |
0 |
unless $dbdir
|
|
125
|
0 |
0 |
unless $backd
|
|
127
|
0 |
0 |
unless -d $backd
|
|
129
|
0 |
0 |
if ($up->can('revert_created') // \&DiaColloDB::Upgrade::Base::revert_created) eq \&DiaColloDB::Upgrade::Base::revert_created
|
|
131
|
0 |
0 |
if ($up->can('revert_updated') // \&DiaColloDB::Upgrade::Base::revert_updated) eq \&DiaColloDB::Upgrade::Base::revert_updated
|
|
140
|
0 |
0 |
unless -e "$backd/$_"
|
|
146
|
0 |
0 |
unless not -e "$dbdir/$_" or unlink "$dbdir/$_"
|
|
154
|
0 |
0 |
unless DiaColloDB::Utils::copyto_a("$backd/$_", $dbdir, 'from', $backd)
|
|
160
|
0 |
0 |
unless remove_tree($backd)
|
|
186
|
0 |
0 |
if ref $up
|
|
188
|
0 |
0 |
if ref $up and defined $up->{'hdr'} and ($up->{'dbdir'} // '') eq $dbdir
|
|
189
|
0 |
0 |
unless my $hdr = DiaColloDB::Utils::loadJsonFile("$dbdir/header.json")
|
|
205
|
0 |
0 |
scalar(@_) % 2 == 0 ? :
|
|
206
|
0 |
0 |
$dbdir ? :
|
|
224
|
0 |
0 |
unless not $up->{'backup'} or DiaColloDB::Utils::copyto_a("$dbdir/header.json", $up->backupdir)
|
|
229
|
0 |
0 |
unless defined $uinfo
|
|
234
|
0 |
0 |
if $uinfo->{'version_to'}
|
|
235
|
0 |
0 |
if $xhdr
|
|
236
|
0 |
0 |
unless DiaColloDB::Utils::saveJsonFile($header, "$dbdir/header.json")
|