From: Eric Wong <e@80x24.org>
Date: Sat, 10 Sep 2022 08:17:25 +0000 (+0000)
Subject: gzip_filter: write: use multi-arg translate
X-Git-Url: http://www.git.stargrave.org/?a=commitdiff_plain;h=a137e8448578bcf80d026e6ee0c414fe23248366;p=public-inbox.git

gzip_filter: write: use multi-arg translate

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.
---

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 {