This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
[rt.cpan.org #61577] try to populate socket info when not cached
[perl5.git] / dist / IO / t / cachepropagate-udp.t
index de18eae..91cff37 100644 (file)
@@ -23,7 +23,6 @@ ok(defined($s), 'type defined');
 
 my $new = IO::Socket::INET->new_from_fd($listener->fileno(), 'r+');
 
-local $TODO = "this information isn't cached for accepted sockets";
 is($new->sockdomain(), $d, 'domain match');
 SKIP: {
     skip "no Socket::SO_PROTOCOL", 1 if !defined(eval { Socket::SO_PROTOCOL });