| line |
true |
false |
branch |
|
67
|
1 |
20 |
unless defined $args{'Action'} |
|
70
|
1 |
19 |
unless exists $actions{$action} |
|
80
|
12 |
7 |
if ($actions{$action}{'read_config'}) |
|
81
|
1 |
11 |
unless -f $metadata |
|
108
|
10 |
1 |
if $actions{$$self{'action'}}{'write_config'} |
|
125
|
1 |
3 |
if -f $$self{'metadata'} |
|
127
|
3 |
0 |
if defined $$self{'args'}{'Min'} |
|
130
|
3 |
0 |
if (defined $$self{'args'}{'Max'}) |
|
131
|
0 |
3 |
if substr($$self{'args'}{'Max'}, 0, 1) eq 'r' |
|
133
|
1 |
2 |
if $$self{'config'}{'max'} > $max |
|
150
|
1 |
2 |
unless defined $rev |
|
151
|
0 |
3 |
unless defined $rev |
|
152
|
0 |
3 |
if substr($rev, 0, 1) eq 'r' |
|
153
|
3 |
0 |
if ($self->ready) |
|
154
|
1 |
2 |
unless exists $$self{'config'}{'extant'}{$rev} |
|
172
|
1 |
2 |
unless defined $rev |
|
173
|
0 |
3 |
unless defined $rev |
|
174
|
0 |
3 |
if substr($rev, 0, 1) eq 'r' |
|
175
|
3 |
0 |
if ($self->ready) { } |
|
176
|
1 |
2 |
unless exists $$self{'config'}{'extant'}{$rev} |
|
180
|
0 |
0 |
if $max < $rev |
|
200
|
0 |
1 |
if (defined $arg and $arg) { } |
|
223
|
2 |
2 |
unless scalar @rev |
|
225
|
0 |
4 |
if substr($rev, 0, 1) eq 'r' |
|
226
|
1 |
3 |
unless exists $$self{'config'}{'extant'}{$rev} |
|
246
|
1 |
2 |
unless scalar @rev |
|
248
|
0 |
2 |
if substr($rev, 0, 1) eq 'r' |
|
249
|
1 |
1 |
unless exists $$self{'config'}{'extant'}{$rev} |
|
278
|
0 |
0 |
unless scalar @cmd |
|
279
|
0 |
0 |
unless $self->ready |
|
281
|
0 |
0 |
unless scalar @revs |
|
284
|
0 |
0 |
unless scalar @revs |
|
286
|
0 |
0 |
if ($? == -1) |
|
289
|
0 |
0 |
if ($? & 127) |
|
293
|
0 |
0 |
if ($rv > 127) |
|
296
|
0 |
0 |
if ($rv == 0) { } |
|
|
0 |
0 |
elsif ($rv != 125) { } |
|
325
|
2 |
2 |
unless defined $subcommand |
|
426
|
1 |
3 |
unless exists $help{$subcommand} |
|
447
|
1 |
0 |
if ($self->ready) { } |
|
456
|
1 |
0 |
if (@revs < 30) |
|
463
|
0 |
0 |
if defined $min |
|
464
|
0 |
0 |
if defined $max |
|
485
|
1 |
0 |
if ($rv) |
|
508
|
1 |
30 |
unless defined $$self{'config'}{'min'} |
|
509
|
1 |
29 |
unless defined $$self{'config'}{'max'} |
|
510
|
0 |
29 |
if substr($$self{'config'}{'min'}, 0, 1) eq 'r' |
|
511
|
0 |
29 |
if substr($$self{'config'}{'max'}, 0, 1) eq 'r' |
|
512
|
3 |
26 |
unless defined $$self{'config'}{'extant'} |
|
529
|
0 |
10 |
unless $self->ready |
|
531
|
2 |
8 |
unless (scalar @revs) |
|
538
|
2 |
1 |
if (exists $$self{'config'}{'skip'}{$rev}) { } |
|
545
|
1 |
1 |
if ($previous_skips) { } |
|
554
|
6 |
2 |
if scalar @revs > 1 |
|
577
|
0 |
11 |
unless $self->ready |
|
582
|
9 |
209 |
if exists $$self{'config'}{'skip'}{$rev} |
|
583
|
40 |
169 |
if exists $$self{'config'}{'extant'}{$rev} |
|
615
|
1 |
1 |
unless $$self{'args'}{'Verbose'} |
|
667
|
0 |
3 |
if $max - $min > 100 |
|
673
|
8 |
9 |
if ($line =~ /^r(\d+) /) |
|
695
|
4 |
4 |
if ($line =~ /^r(\d+) /) |
|
717
|
5 |
5 |
if ($line =~ /^Last Changed Rev: (\d+)/) |