X-Git-Url: http://www.git.stargrave.org/?p=public-inbox.git;a=blobdiff_plain;f=lib%2FPublicInbox%2FV2Writable.pm;h=b6532ac5c9476540017f9ee9757cdc7c533cfb46;hp=479e2b5daafbd25c0868a0a762fea6edee65a794;hb=b4d127cb83230fe5cee0dcecb573107ad96a7c4c;hpb=89537db2ca4b506a7b7500dcd7b7c5430a0a6dc7 diff --git a/lib/PublicInbox/V2Writable.pm b/lib/PublicInbox/V2Writable.pm index 479e2b5d..b6532ac5 100644 --- a/lib/PublicInbox/V2Writable.pm +++ b/lib/PublicInbox/V2Writable.pm @@ -224,11 +224,13 @@ sub purge_oids { my ($self, $purge) = @_; # $purge = { $object_id => 1, ... } $self->done; my $pfx = "$self->{-inbox}->{mainrepo}/git"; + my $purges = []; foreach my $i (0..$self->{max_git}) { my $git = PublicInbox::Git->new("$pfx/$i.git"); my $im = $self->import_init($git, 0); - $im->purge_oids($purge); + $purges->[$i] = $im->purge_oids($purge); } + $purges; } sub remove_internal { @@ -285,7 +287,7 @@ sub remove_internal { $self->barrier; } if ($purge && scalar keys %$purge) { - purge_oids($self, $purge); + return purge_oids($self, $purge); } $removed; }