about summary refs log tree commit homepage
path: root/lib/PublicInbox/LeiFinmsg.pm
diff options
context:
space:
mode:
Diffstat (limited to 'lib/PublicInbox/LeiFinmsg.pm')
-rw-r--r--lib/PublicInbox/LeiFinmsg.pm21
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;