}
my $cmd = [ 'git', "--git-dir=$git_dir",
qw(config extensions.objectFormat) ];
- run_await($cmd, undef, undef, \&prep_alternate_end, $o, $run_prune);
+ my $opt = { quiet => 1 };
+ run_await($cmd, undef, $opt, \&prep_alternate_end, $o, $run_prune);
}
sub cmd_done { # run_await cb for sort, xapian-delve, sed failures
my $pwd = getcwd();
my @unused_keys = qw(last_commit has_threadid skip_docdata);
local $ENV{PI_CONFIG} = '/dev/null';
+my $opt = { 1 => \(my $cidx_out), 2 => \(my $cidx_err) };
# I reworked CodeSearchIdx->shard_worker to handle empty trees
# in the initial commit generated by cvs2svn for xapian.git
is(scalar($csrch->mset('s:hi')->items), 1, 'got hit');
rename("$tmp/wt0/.git", "$tmp/wt0/.giit");
- ok(run_script([qw(-cindex -q --prune -d), "$tmp/ext"]), 'prune');
+ ok(run_script([qw(-cindex -q --prune -d), "$tmp/ext"], undef, $opt),
+ 'prune');
+ is(${$opt->{2}}, '', 'nothing in stderr') or diag explain($opt);
$csrch->reopen;
is(scalar($csrch->mset('s:hi')->items), 0, 'hit pruned');
close $fh;
my $cmd = [ qw(-cindex -u --all --associate -d), "$tmp/ext",
'-I', $basic->{inboxdir} ];
- my $opt = { 1 => \(my $cidx_out), 2 => \(my $cidx_err) };
+ $cidx_out = $cidx_err = '';
ok(run_script($cmd, $env, $opt), 'associate w/o search');
like($cidx_err, qr/W: \Q$basic->{inboxdir}\E not indexed for search/,
'non-Xapian-enabled inbox noted');