lei q|up: support v2:/path/to/inboxdir destination

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

diff --git a/lib/PublicInbox/V2Writable.pm b/lib/PublicInbox/V2Writable.pm
index 0461257feb7b483329d09f4b0e5e75f9b5913b0d..573d9c6f817a7867f4b50e901147c2383e3359f8 100644 (file)
--- a/lib/PublicInbox/V2Writable.pm
+++ b/lib/PublicInbox/V2Writable.pm
@@ -6,7 +6,7 @@
 package PublicInbox::V2Writable;
 use strict;
 use v5.10.1;
-use parent qw(PublicInbox::Lock);
+use parent qw(PublicInbox::Lock PublicInbox::IPC);
 use PublicInbox::SearchIdxShard;
 use PublicInbox::IPC;
 use PublicInbox::Eml;
@@ -1431,4 +1431,13 @@ W: interrupted, --xapian-only --reindex required upon restart
 EOF
 }
 
+sub ipc_atfork_child {
+       my ($self) = @_;
+       if (my $lei = delete $self->{lei}) {
+               $lei->_lei_atfork_child;
+               close(delete $lei->{pkt_op_p});
+       }
+       $self->SUPER::ipc_atfork_child;
+}
+
 1;