diff options
author | Eric Wong <e@80x24.org> | 2022-09-10 08:17:25 +0000 |
---|---|---|
committer | Eric Wong <e@80x24.org> | 2022-09-10 19:50:54 +0000 |
commit | a137e8448578bcf80d026e6ee0c414fe23248366 (patch) | |
tree | c6eaf9512e06587dd512cdbeeafd9506ab14fbe0 | |
parent | 4dca6dfadbea2c746f20b8c7d7977ef5f96a3106 (diff) | |
download | public-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.
-rw-r--r-- | lib/PublicInbox/GzipFilter.pm | 2 |
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 { |