From: Eric Wong <e@80x24.org>
Date: Fri, 11 Jan 2019 02:47:57 +0000 (+0000)
Subject: v2writable: cleanup processes when done
X-Git-Tag: v1.2.0~382^2~2
X-Git-Url: http://www.git.stargrave.org/?a=commitdiff_plain;h=5126394a3806bd438bd0ef9c596ffa2e3cfb8db9;p=public-inbox.git

v2writable: cleanup processes when done

Otherwise, Perl may exit successfully when a failure code
is desired.
---

diff --git a/lib/PublicInbox/V2Writable.pm b/lib/PublicInbox/V2Writable.pm
index 970244eb..ec28e510 100644
--- a/lib/PublicInbox/V2Writable.pm
+++ b/lib/PublicInbox/V2Writable.pm
@@ -291,6 +291,7 @@ sub purge_oids {
 		my $git = PublicInbox::Git->new($git_dir);
 		my $im = $self->import_init($git, 0, 1);
 		$purges->[$i] = $im->purge_oids($purge);
+		$im->done;
 	}
 	$purges;
 }
@@ -499,6 +500,7 @@ sub done {
 	delete $self->{bnote};
 	$self->{transact_bytes} = 0;
 	$self->lock_release if $parts;
+	$self->{-inbox}->git->cleanup;
 }
 
 sub git_init {