imap: split ->logged_in attribute into a separate class

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

diff --git a/lib/PublicInbox/IMAPdeflate.pm b/lib/PublicInbox/IMAPdeflate.pm
index 42daa6cffaaa37f75b581e4665ebfece65cf8a77..b98a069d9b6d00feb8e7f1aeb520c6d36e34ea45 100644 (file)
--- a/lib/PublicInbox/IMAPdeflate.pm
+++ b/lib/PublicInbox/IMAPdeflate.pm
@@ -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;