line |
true |
false |
branch |
18
|
0 |
5 |
unless ($vc) |
41
|
1 |
0 |
if ($backup_file =~ /^$file.~(\d+)~$/) |
47
|
1 |
2 |
if (@version_numbers) |
62
|
1 |
2 |
if ($max_version_number) |
69
|
0 |
3 |
if (-f $next_file) |
81
|
2 |
0 |
unless ($suffix) |
106
|
0 |
0 |
if ($max_version_number) { } |
121
|
1 |
5 |
if (not -f $file) { } |
127
|
0 |
5 |
if (not $version_control or $version_control eq 'existing' or $version_control eq 'nil') |
132
|
3 |
2 |
if ($version_control eq 'numbered' or $version_control eq 't') { } |
|
2 |
0 |
elsif ($version_control eq 'simple' or $version_control eq 'never') { } |
150
|
0 |
3 |
unless (-f $file) |
154
|
0 |
3 |
if (-f $backup_file) |
155
|
0 |
0 |
unless unlink $backup_file |
157
|
0 |
3 |
unless rename $file, $backup_file |