| line |
true |
false |
branch |
|
11
|
0 |
1 |
if ($^O eq 'MSWin32') { } |
|
51
|
0 |
0 |
if $Options{'debug'} |
|
74
|
0 |
0 |
if (my $options = config("options.$cmd")) |
|
80
|
0 |
0 |
unless GetOptions \%Options, 'debug', 'help', @opt_specs |
|
81
|
0 |
0 |
if $Options{'help'} |
|
100
|
0 |
0 |
unless ($config) |
|
105
|
0 |
0 |
if (/^(.+?)\.(\S+)=(.*)/u) { } |
|
119
|
0 |
0 |
unless ($url) |
|
121
|
0 |
0 |
unless $url = $$config{'remote'}{"$remote.url"}[-1] |
|
128
|
0 |
0 |
unless ($$config{'git-gerrit'}{'baseurl'}) |
|
134
|
0 |
0 |
unless ($$config{'git-gerrit'}{'project'}) |
|
137
|
0 |
0 |
if (length $prefix) { } |
|
138
|
0 |
0 |
unless $prefix eq substr($path, 0, length $prefix) |
|
163
|
0 |
0 |
exists $$config{'git-gerrit'}{$var} ? : |
|
173
|
0 |
0 |
exists $$config{'git-gerrit'}{$var} ? : |
|
189
|
0 |
0 |
if -e $commit_msg |
|
193
|
0 |
0 |
unless -e $hooks_dir |
|
197
|
0 |
0 |
if ($@) { } |
|
201
|
0 |
0 |
if (LWP::Simple::is_success(LWP::Simple::getstore(config('baseurl') . '/tools/hooks/commit-msg', $commit_msg))) |
|
213
|
0 |
0 |
if (my $userinfo = $url->userinfo) { } |
|
232
|
0 |
0 |
if $username |
|
238
|
0 |
0 |
if $value |
|
254
|
0 |
0 |
unless open my $pipe, '-|', "git credential fill <$credfile" |
|
258
|
0 |
0 |
if /^([^=]+)=(.*)/u |
|
260
|
0 |
0 |
unless (close $pipe) |
|
261
|
0 |
0 |
if $! |
|
272
|
0 |
0 |
unless (defined $username and defined $password) |
|
277
|
0 |
0 |
unless (defined $username and defined $password) |
|
279
|
0 |
0 |
if (eval {
do {
require Net::Netrc
}
}) { } |
|
280
|
0 |
0 |
if (my $mach = 'Net::Netrc'->lookup('URI'->new(config('baseurl'))->host, $username)) |
|
288
|
0 |
0 |
unless (defined $username and defined $password) |
|
290
|
0 |
0 |
if (eval {
do {
require Term::Prompt
}
}) { } |
|
299
|
0 |
0 |
unless defined $username |
|
300
|
0 |
0 |
unless defined $password |
|
308
|
0 |
0 |
unless $git_credential_supported |
|
310
|
0 |
0 |
unless $what =~ /^(?:approve|reject)$/u |
|
324
|
0 |
0 |
if exists $Options{'message'} |
|
328
|
0 |
0 |
unless $editor |
|
336
|
0 |
0 |
unless open my $fh, '>', $filename |
|
346
|
0 |
0 |
unless cmd("$editor $filename") |
|
351
|
0 |
0 |
unless open my $fh, '<', $filename |
|
368
|
0 |
0 |
unless ($gerrit) |
|
373
|
0 |
0 |
if (my $error = $@) { } |
|
374
|
0 |
0 |
if $$error{'code'} == 401 |
|
381
|
0 |
0 |
if ($Options{'debug'}) |
|
384
|
0 |
0 |
if (@args) |
|
400
|
0 |
0 |
if $@ |
|
419
|
0 |
0 |
unless @queries |
|
423
|
0 |
0 |
if (my $project = config('project')) |
|
428
|
0 |
0 |
if $Options{'limit'} |
|
433
|
0 |
0 |
if ref $$changes[0] eq 'HASH' |
|
446
|
0 |
0 |
$allrevs ? : |
|
474
|
0 |
0 |
if ($branch =~ m[^change/(?.*)/(?[^/]+)]u) |
|
497
|
0 |
0 |
if (not defined $cr) { } |
|
|
0 |
0 |
elsif (exists $$cr{'rejected'}) { } |
|
|
0 |
0 |
elsif (exists $$cr{'disliked'}) { } |
|
|
0 |
0 |
elsif (exists $$cr{'approved'}) { } |
|
|
0 |
0 |
elsif (exists $$cr{'recommended'}) { } |
|
525
|
0 |
0 |
if (my($users, @conditions) = split(' ', $spec, 0)) |
|
526
|
0 |
0 |
if (@conditions) |
|
529
|
0 |
0 |
if (my($what, $op, $match) = $condition =~ /^(branch|path)([=~])(.+)$/iu) { } |
|
530
|
0 |
0 |
if ($what eq 'branch') { } |
|
531
|
0 |
0 |
if ($op eq '=') { } |
|
532
|
0 |
0 |
if $upstream eq $match |
|
535
|
0 |
0 |
unless defined $regex |
|
538
|
0 |
0 |
if $upstream =~ /$match/u |
|
541
|
0 |
0 |
unless ($paths) |
|
545
|
0 |
0 |
if ($op eq '=') { } |
|
547
|
0 |
0 |
if $path eq $match |
|
551
|
0 |
0 |
unless defined $regex |
|
555
|
0 |
0 |
if $path =~ /$regex/u |
|
580
|
0 |
0 |
if (@ARGV) { } |
|
583
|
0 |
0 |
unless my $id = current_change_id() |
|
585
|
0 |
0 |
unless $id =~ /^\d+$/u |
|
599
|
0 |
0 |
if cmd("git checkout $upstream") |
|
1191
|
0 |
0 |
unless $Command = shift @ARGV |
|
1194
|
0 |
0 |
unless exists $Commands{$Command} |