diff options
author | Eric Wong <e@80x24.org> | 2023-01-03 11:35:15 +0000 |
---|---|---|
committer | Eric Wong <e@80x24.org> | 2023-01-04 19:46:02 +0000 |
commit | a30dd4aa9455f4166c6bc18e043fccd645b4231c (patch) | |
tree | 93bd2cf64f85572bf69245a49ec1d0d32c645171 /lib/PublicInbox/GzipFilter.pm | |
parent | d4ba8828ab23f2785be54493495bbf7e1d62c0b0 (diff) | |
download | public-inbox-a30dd4aa9455f4166c6bc18e043fccd645b4231c.tar.gz |
This should be similar or identical to what's in cgit; and tie into the rest of the www_coderepo stuff.
Diffstat (limited to 'lib/PublicInbox/GzipFilter.pm')
-rw-r--r-- | lib/PublicInbox/GzipFilter.pm | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/lib/PublicInbox/GzipFilter.pm b/lib/PublicInbox/GzipFilter.pm index bd72afff..a11ba73f 100644 --- a/lib/PublicInbox/GzipFilter.pm +++ b/lib/PublicInbox/GzipFilter.pm @@ -123,8 +123,9 @@ sub http_out ($) { } sub write { + my $self = shift; # my $ret = bytes::length($_[1]); # XXX does anybody care? - http_out($_[0])->write(translate(@_)); + http_out($self)->write($self->translate(@_)); } sub zfh { @@ -166,7 +167,7 @@ sub zflush ($;@) { sub close { my ($self) = @_; my $http_out = http_out($self) // return; - $http_out->write(zflush($self)); + $http_out->write($self->zflush); (delete($self->{http_out}) // return)->close; } |