diff options
Diffstat (limited to 't/xcpdb-reshard.t')
| -rw-r--r-- | t/xcpdb-reshard.t | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/t/xcpdb-reshard.t b/t/xcpdb-reshard.t index 8516b907..7797aaaf 100644 --- a/t/xcpdb-reshard.t +++ b/t/xcpdb-reshard.t @@ -4,7 +4,7 @@ use strict; use v5.10.1; use PublicInbox::TestCommon; -require_mods(qw(DBD::SQLite Search::Xapian)); +require_mods(qw(DBD::SQLite Xapian)); require_git('2.6'); use PublicInbox::Eml; require PublicInbox::Search; @@ -43,7 +43,7 @@ my $XapianDatabase = do { for my $R (qw(2 4 1 3 3)) { delete $ibx->{search}; # release old handles my $cmd = [@xcpdb, "-R$R", $ibx->{inboxdir}]; - push @$cmd, '--compact' if $R == 1 && have_xapian_compact; + push @$cmd, '--compact' if $R == 1 && have_xapian_compact(1); ok(run_script($cmd, $env), "xcpdb -R$R"); my @new_shards = grep(m!/\d+\z!, glob("$ibx->{inboxdir}/xap*/*")); is(scalar(@new_shards), $R, 'resharded to two shards'); |