PID guards for OnDestroy will be the default in an upcoming
change.  In the meantime, LeiMirror was the only user and
didn't actually need it.
---
 lib/PublicInbox/LeiMirror.pm | 2 +-
 lib/PublicInbox/Lock.pm      | 8 ++++----
 2 files changed, 5 insertions(+), 5 deletions(-)

diff --git a/lib/PublicInbox/LeiMirror.pm b/lib/PublicInbox/LeiMirror.pm
index 5353ae61..4e3e1d1c 100644
--- a/lib/PublicInbox/LeiMirror.pm
+++ b/lib/PublicInbox/LeiMirror.pm
@@ -856,7 +856,7 @@ sub v2_done { # called via OnDestroy
        my $dst = $self->{cur_dst} // $self->{dst};
        require PublicInbox::Lock;
        my $lk = PublicInbox::Lock->new("$dst/inbox.lock");
-       my $lck = $lk->lock_for_scope($$);
+       my $lck = $lk->lock_for_scope;
        _write_inbox_config($self);
        require PublicInbox::MultiGit;
        my $mg = PublicInbox::MultiGit->new($dst, 'all.git', 'git');
diff --git a/lib/PublicInbox/Lock.pm b/lib/PublicInbox/Lock.pm
index ddaf3312..2a5a0f30 100644
--- a/lib/PublicInbox/Lock.pm
+++ b/lib/PublicInbox/Lock.pm
@@ -41,9 +41,9 @@ sub lock_release {
 
 # caller must use return value
 sub lock_for_scope {
-       my ($self, @single_pid) = @_;
+       my ($self) = @_;
        lock_acquire($self) or return; # lock_path not set
-       PublicInbox::OnDestroy->new(@single_pid, \&lock_release, $self);
+       PublicInbox::OnDestroy->new(\&lock_release, $self);
 }
 
 sub lock_acquire_fast {
@@ -58,9 +58,9 @@ sub lock_release_fast {
 
 # caller must use return value
 sub lock_for_scope_fast {
-       my ($self, @single_pid) = @_;
+       my ($self) = @_;
        lock_acquire_fast($self) or return; # lock_path not set
-       PublicInbox::OnDestroy->new(@single_pid, \&lock_release_fast, $self);
+       PublicInbox::OnDestroy->new(\&lock_release_fast, $self);
 }
 
 1;

Reply via email to