diff options
Diffstat (limited to 'lib/PublicInbox/LeiFinmsg.pm')
-rw-r--r-- | lib/PublicInbox/LeiFinmsg.pm | 21 |
1 files changed, 21 insertions, 0 deletions
diff --git a/lib/PublicInbox/LeiFinmsg.pm b/lib/PublicInbox/LeiFinmsg.pm new file mode 100644 index 00000000..0ef5f070 --- /dev/null +++ b/lib/PublicInbox/LeiFinmsg.pm @@ -0,0 +1,21 @@ +# Copyright (C) all contributors <meta@public-inbox.org> +# License: AGPL-3.0+ <https://www.gnu.org/licenses/agpl-3.0.txt> + +# 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; |