remove unnecessary fields usage

[public-inbox.git] / public-inbox-nntpd

diff --git a/public-inbox-nntpd b/public-inbox-nntpd
index f6042c2f9d1fb14d86986f13c3cef38829fa3069..79161fb71b2fb188ba69b04c98f4fdccfbabf6e6 100644 (file)
--- a/public-inbox-nntpd
+++ b/public-inbox-nntpd
@@ -15,16 +15,15 @@ daemon_run('0.0.0.0:119',
 package PublicInbox::NNTPD;
 use strict;
 use warnings;
-use fields qw(groups grouplist err out);
 
 sub new {
        my ($class) = @_;
-       my $self = fields::new($class);
-       $self->{groups} = {};
-       $self->{err} = \*STDERR;
-       $self->{out} = \*STDOUT;
-       $self->{grouplist} = [];
-       $self;
+       bless {
+               groups => {},
+               err => \*STDERR,
+               out => \*STDOUT,
+               grouplist => [],
+       }, $class;
 }
 
 sub refresh_groups () {