line |
true |
false |
branch |
42
|
0 |
0 |
if ($App::Rakubrew::Update::distro_format eq "cpan") |
51
|
0 |
0 |
if ($App::Rakubrew::VERSION >= $release_index->{'latest'}) |
57
|
0 |
0 |
unless ($quiet) |
61
|
0 |
0 |
if $change->{'version'} <= $App::Rakubrew::VERSION |
69
|
0 |
0 |
if $reply ne "y" |
73
|
0 |
0 |
unless -d catdir($App::Rakubrew::Update::prefix, "update") |
81
|
0 |
0 |
unless ($res->{'success'}) |
86
|
0 |
0 |
unless (sysopen $fh, $update_file, 193, 511) |
94
|
0 |
0 |
if ($^O =~ /win32/i) { } |
108
|
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(), ".")) |
137
|
0 |
0 |
if ($update_file ne $current_script) |
143
|
0 |
0 |
if ($old_version < 29) |
155
|
0 |
0 |
if -d catdir($repo, ".git") |
157
|
0 |
0 |
if (-f $config_file) |
161
|
0 |
0 |
if ($replaced) { } |
176
|
0 |
0 |
unless unlink $old_rakubrew_file |
178
|
0 |
0 |
unless (sysopen $fh, $old_rakubrew_file, 193, 511) |
183
|
0 |
0 |
unless (copy($update_file, $fh)) |
198
|
0 |
0 |
unless ($res->{'success'}) |