lib/PublicInbox/LeiOverview.pm | 2 ++ diff --git a/lib/PublicInbox/LeiOverview.pm b/lib/PublicInbox/LeiOverview.pm index 88034adadaed4e5d9551199964203d4ae0f5d401..366af8b2768d8c35d281f098a280396285938600 100644 --- a/lib/PublicInbox/LeiOverview.pm +++ b/lib/PublicInbox/LeiOverview.pm @@ -216,7 +216,9 @@ my ($smsg, undef, $eml) = @_; # no mitem in $_[1] $wcb->(undef, $smsg, $eml); }; } elsif ($l2m && $l2m->{-wq_s1}) { + my $sock = delete $lei->{sock}; # lei2mail doesn't need it my ($lei_ipc, @io) = $lei->atfork_parent_wq($l2m); + $lei->{sock} = $sock if $sock; # $io[0] becomes a notification pipe that triggers EOF # in this wq worker when all outstanding ->write_mail # calls are complete