No ext_urls

[public-inbox.git] / lib / PublicInbox / DSdeflate.pm

diff --git a/lib/PublicInbox/DSdeflate.pm b/lib/PublicInbox/DSdeflate.pm
index b5208e4368abd63626cf617eda1bd4ba4f00fb08..539adf0fbfd47f1097b6ae89952534835cac7006 100644 (file)
--- a/lib/PublicInbox/DSdeflate.pm
+++ b/lib/PublicInbox/DSdeflate.pm
@@ -27,10 +27,10 @@ my %IN_OPT = (
 );
 
 # global deflate context and buffer
-my $zbuf = \(my $buf = '');
-my $zout;
+my ($zout, $zbuf);
 {
        my $err;
+       $zbuf = \(my $initial = ''); # replaced by $next in dflush/write
        ($zout, $err) = Compress::Raw::Zlib::Deflate->new(
                # nnrpd (INN) and Compress::Raw::Zlib favor MemLevel=9,
                # the zlib C library and git use MemLevel=8 as the default
@@ -46,7 +46,7 @@ sub enable {
        my ($class, $self) = @_;
        my ($in, $err) = Compress::Raw::Zlib::Inflate->new(%IN_OPT);
        if ($err != Z_OK) {
-               $self->err("Inflate->new failed: $err");
+               warn("Inflate->new failed: $err\n");
                return;
        }
        bless $self, $class;
@@ -100,7 +100,7 @@ sub msg_more ($$) {
        1;
 }
 
-sub zflush ($) {
+sub dflush ($) {
        my ($self) = @_;
 
        my $deflated = $zbuf;