line |
true |
false |
branch |
41
|
0 |
0 |
if ($App::Rakubrew::Update::distro_format eq "cpan") |
50
|
0 |
0 |
if ($App::Rakubrew::VERSION >= $release_index->{'latest'}) |
56
|
0 |
0 |
unless ($quiet) |
60
|
0 |
0 |
if $change->{'version'} <= $App::Rakubrew::VERSION |
68
|
0 |
0 |
if $reply ne "y" |
72
|
0 |
0 |
unless -d catdir($App::Rakubrew::Update::prefix, "update") |
80
|
0 |
0 |
unless ($res->{'success'}) |
85
|
0 |
0 |
unless (sysopen $fh, $update_file, 193, 511) |
93
|
0 |
0 |
if ($^O =~ /win32/i) { } |
107
|
0 |
0 |
unless (Win32::Process::Create($ProcessObj, $update_file, Win32::ShellQuote::quote_native($update_file, "internal_update", $App::Rakubrew::VERSION, $current_rakubrew_file), 0, Win32::Process::NORMAL_PRIORITY_CLASS(), ".")) |
136
|
0 |
0 |
if ($update_file ne $current_script) |
142
|
0 |
0 |
if ($old_version < 29) |
154
|
0 |
0 |
if -d catdir($repo, ".git") |
156
|
0 |
0 |
if (-f $config_file) |
160
|
0 |
0 |
if ($replaced) { } |
175
|
0 |
0 |
unless unlink $old_rakubrew_file |
177
|
0 |
0 |
unless (sysopen $fh, $old_rakubrew_file, 193, 511) |
182
|
0 |
0 |
unless (copy($update_file, $fh)) |
197
|
0 |
0 |
unless ($res->{'success'}) |