t/nntpd.t | 2 +- diff --git a/t/nntpd.t b/t/nntpd.t index d30ed63f9fb04baf4c66d93adec93854465354b4..d886e3c65e71949996decace5456859ea5fa5162 100644 --- a/t/nntpd.t +++ b/t/nntpd.t @@ -88,8 +88,8 @@ die "FAIL: $!\n"; } ok(defined $pid, 'forked nntpd process successfully'); $! = 0; - ok(! $!, 'no error from fcntl(F_SETFD)'); fcntl($sock, F_SETFD, $fl |= FD_CLOEXEC); + ok(! $!, 'no error from fcntl(F_SETFD)'); my $n = Net::NNTP->new($sock->sockhost . ':' . $sock->sockport); my $list = $n->list; is_deeply($list, { $group => [ qw(1 1 n) ] }, 'LIST works');