1 # Copyright (C) all contributors <meta@public-inbox.org>
2 # License: AGPL-3.0+ <https://www.gnu.org/licenses/agpl-3.0.txt>
4 # Finalization messages, used to queue up a bunch of messages which
5 # only get written out on ->DESTROY
6 package PublicInbox::LeiFinmsg;
12 bless [ @$lei{qw(2 sock)}, $$ ], $cls;
17 my ($stderr, $sock, $pid) = splice(@$self, 0, 3);
18 print $stderr @$self if $pid == $$;
19 # script/lei disconnects when $sock SvREFCNT drops to zero