about summary refs log tree commit homepage
path: root/t/indexlevels-mirror.t
diff options
context:
space:
mode:
authorEric Wong <e@80x24.org>2019-05-23 09:36:53 +0000
committerEric Wong <e@80x24.org>2019-05-23 17:43:50 +0000
commit7a097dce831a9ad3a99e50013138e57a0def514e (patch)
tree4e0c12f425205168e58bc83c3a4063c53d21ddc9 /t/indexlevels-mirror.t
parent0c6d38221ec9fbf9d7c7e0329252b10f17ab7a27 (diff)
downloadpublic-inbox-7a097dce831a9ad3a99e50013138e57a0def514e.tar.gz
Copying an entire Xapian DB is horribly slow whether it's done
via Perl or copydatabase(1).  So displaying some progress
indication is good for user experience.

While we're at it, prefix xapian-compact output, too; since
parallel processes end up clobbering each other.
Diffstat (limited to 't/indexlevels-mirror.t')
-rw-r--r--t/indexlevels-mirror.t4
1 files changed, 2 insertions, 2 deletions
diff --git a/t/indexlevels-mirror.t b/t/indexlevels-mirror.t
index 61053b66..57a776f7 100644
--- a/t/indexlevels-mirror.t
+++ b/t/indexlevels-mirror.t
@@ -18,7 +18,7 @@ foreach my $mod (qw(DBD::SQLite)) {
 
 my $path = 'blib/script';
 my $index = "$path/public-inbox-index";
-my $xcpdb = "$path/public-inbox-xcpdb";
+my @xcpdb = ("$path/public-inbox-xcpdb", '-q');
 
 my $mime = PublicInbox::MIME->create(
         header => [
@@ -110,7 +110,7 @@ sub import_index_incremental {
         $im->done;
 
         if ($level ne 'basic') {
-                is(system($xcpdb, $mirror), 0, "v$v xcpdb OK");
+                is(system(@xcpdb, $mirror), 0, "v$v xcpdb OK");
                 delete $ro_mirror->{$_} for (qw(over search));
                 ($nr, $msgs) = $ro_mirror->search->query('m:m@2');
                 is($nr, 1, "v$v found m\@2 via Xapian on $level");