lib/PublicInbox/V2Writable.pm | 1 + t/v2reindex.t | 10 +++++++++- diff --git a/lib/PublicInbox/V2Writable.pm b/lib/PublicInbox/V2Writable.pm index 03590850973e0589000b29884d2f812759d128ae..4130a4728feff01314166d9a7528fc96d4e6fe4b 100644 --- a/lib/PublicInbox/V2Writable.pm +++ b/lib/PublicInbox/V2Writable.pm @@ -1323,6 +1323,7 @@ index_xap_step($self, $sync, $art_beg, 1); } } $self->git->cat_async_wait; + $self->{ibx}->cleanup; $self->done; } diff --git a/t/v2reindex.t b/t/v2reindex.t index 1145e31b414e7118b49a66766c4c358f7f6453ed..e9f2b73b2b9083060359a45300c2fc286f173853 100644 --- a/t/v2reindex.t +++ b/t/v2reindex.t @@ -549,5 +549,13 @@ my $env = { PI_CONFIG => '/dev/null' }; ok(run_script([qw(-index --reindex --xapian-only), $inboxdir], $env, $rdr), '--xapian-only works'); is($err, '', 'no errors from --xapian-only'); - +undef $for_destroy; +SKIP: { + use PublicInbox::Spawn qw(which); + skip 'only testing lsof(8) output on Linux', 1 if $^O ne 'linux'; + my $lsof = which('lsof') or skip 'no lsof in PATH', 1; + my $rdr = { 2 => \(my $null_err) }; + my @d = grep(m!/xap[0-9]+/!, xqx([$lsof, '-p', $$], undef, $rdr)); + is_deeply(\@d, [], 'no deleted index files') or diag explain(\@d); +} done_testing();