ds: introduce awaitpid, switch ProcessPipe users

[public-inbox.git] / lib / PublicInbox / LeiToMail.pm

diff --git a/lib/PublicInbox/LeiToMail.pm b/lib/PublicInbox/LeiToMail.pm
index b58e26525fe858cb63079db6d64c7bca9f96785d..1528165a7e00f9571332062c27934c09058b2418 100644 (file)
--- a/lib/PublicInbox/LeiToMail.pm
+++ b/lib/PublicInbox/LeiToMail.pm
@@ -150,8 +150,8 @@ sub git_to_mail { # git->cat_async callback
        $self->{lei}->fail("$@ (oid=$oid)") if $@;
 }
 
-sub reap_compress { # dwaitpid callback
-       my ($lei, $pid) = @_;
+sub reap_compress { # awaitpid callback
+       my ($pid, $lei) = @_;
        my $cmd = delete $lei->{"pid.$pid"};
        return if $? == 0;
        $lei->fail("@$cmd failed", $? >> 8);