pkt_op: make pkt_do an OO method

This will make it easier to use for internal use such as
managing Maildir and IMAP IDLE watches.

1 files changed, 2 insertions, 1 deletions

diff --git a/lib/PublicInbox/V2Writable.pm b/lib/PublicInbox/V2Writable.pm
index 573d9c6f..689d27c8 100644
--- a/lib/PublicInbox/V2Writable.pm
+++ b/lib/PublicInbox/V2Writable.pm
@@ -1435,7 +1435,8 @@ sub ipc_atfork_child {
         my ($self) = @_;
         if (my $lei = delete $self->{lei}) {
                 $lei->_lei_atfork_child;
-                close(delete $lei->{pkt_op_p});
+                my $pkt_op_p = delete $lei->{pkt_op_p};
+                close($pkt_op_p->{op_p});
         }
         $self->SUPER::ipc_atfork_child;
 }