lib/PublicInbox/Daemon.pm | 3 +--

diff --git a/lib/PublicInbox/Daemon.pm b/lib/PublicInbox/Daemon.pm
index 9f33c05af5c6bb0e2066970f72121e359a30d2b1..f0be034c57ef8054f65ac5bf374b61c71d599b4a 100644
--- a/lib/PublicInbox/Daemon.pm
+++ b/lib/PublicInbox/Daemon.pm
@@ -206,8 +206,7 @@ 	my $fds = $ENV{LISTEN_FDS} or return ();
 	my $end = $fds + 2; # LISTEN_FDS_START - 1
 	my @rv = ();
 	foreach my $fd (3..$end) {
-		my $s = IO::Handle->new;
-		$s->fdopen($fd, 'r');
+		my $s = IO::Handle->new_from_fd($fd, 'r');
 		if (my $k = sockname($s)) {
 			$listener_names{$k} = $s;
 			push @rv, $s;