# Copyright (C) all contributors
# License: AGPL-3.0+
# Finalization messages, used to queue up a bunch of messages which
# only get written out on ->DESTROY
package PublicInbox::LeiFinmsg;
use strict;
use v5.10.1;
sub new {
my ($cls, $io) = @_;
bless [ $io ], $cls;
}
sub DESTROY {
my ($self) = @_;
my $io = shift @$self;
print $io @$self;
}
1;