X-Git-Url: http://www.git.stargrave.org/?a=blobdiff_plain;ds=sidebyside;f=lib%2FPublicInbox%2FIMAPdeflate.pm;h=d5929ef26ed5dfd85d2d74e62172b75758066bf0;hb=9b0c238f887475d920a8589b492ec15c63770152;hp=42daa6cffaaa37f75b581e4665ebfece65cf8a77;hpb=c4dd2b484bbb20f2be0d7bc4a0ae0e91df635b4a;p=public-inbox.git
diff --git a/lib/PublicInbox/IMAPdeflate.pm b/lib/PublicInbox/IMAPdeflate.pm
index 42daa6cf..d5929ef2 100644
--- a/lib/PublicInbox/IMAPdeflate.pm
+++ b/lib/PublicInbox/IMAPdeflate.pm
@@ -1,4 +1,4 @@
-# Copyright (C) 2020 all contributors
+# Copyright (C) 2020-2021 all contributors
# License: AGPL-3.0+
# TODO: reduce duplication from PublicInbox::NNTPdeflate
@@ -9,7 +9,6 @@ use warnings;
use 5.010_001;
use base qw(PublicInbox::IMAP);
use Compress::Raw::Zlib;
-use Hash::Util qw(unlock_hash); # dependency of fields for perl 5.10+, anyways
my %IN_OPT = (
-Bufsize => 1024,
@@ -41,7 +40,6 @@ sub enable {
$self->write(\"$tag BAD failed to activate compression\r\n");
return;
}
- unlock_hash(%$self);
$self->write(\"$tag OK DEFLATE active\r\n");
bless $self, $class;
$self->{zin} = $in;