about summary refs log tree commit homepage
path: root/lib/PublicInbox/GzipFilter.pm
diff options
context:
space:
mode:
authorEric Wong <e@80x24.org>2022-09-10 08:17:25 +0000
committerEric Wong <e@80x24.org>2022-09-10 19:50:54 +0000
commita137e8448578bcf80d026e6ee0c414fe23248366 (patch)
treec6eaf9512e06587dd512cdbeeafd9506ab14fbe0 /lib/PublicInbox/GzipFilter.pm
parent4dca6dfadbea2c746f20b8c7d7977ef5f96a3106 (diff)
downloadpublic-inbox-a137e8448578bcf80d026e6ee0c414fe23248366.tar.gz
While we must name this function ->write for PSGI compatibility,
our own uses of it can make it operate more like writev(2)
or `print' in Perl.
Diffstat (limited to 'lib/PublicInbox/GzipFilter.pm')
-rw-r--r--lib/PublicInbox/GzipFilter.pm2
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/PublicInbox/GzipFilter.pm b/lib/PublicInbox/GzipFilter.pm
index 72ab5d50..bd72afff 100644
--- a/lib/PublicInbox/GzipFilter.pm
+++ b/lib/PublicInbox/GzipFilter.pm
@@ -124,7 +124,7 @@ sub http_out ($) {
 
 sub write {
         # my $ret = bytes::length($_[1]); # XXX does anybody care?
-        http_out($_[0])->write(translate($_[0], $_[1]));
+        http_out($_[0])->write(translate(@_));
 }
 
 sub zfh {