Patch:t/lib/io_unix.t _58 QNX

[p5pRT]

Migrated from rt.perl.org#1098 (status was 'resolved')

Searchable as RT1098$

[p5pRT]

From [email protected]

exit 0

*** perl5.005_58.ORIG/t/lib/io_unix.t Tue Jul 20 13​:18​:13 1999
--- perl5.005_58/t/lib/io_unix.t Wed Jul 28 13​:59​:01 1999
***************
*** 27,32 ****
--- 27,34 ----
  eval {IO​::Socket​::pack_sockaddr_un('/tmp/foo') || 1}
  or $@​ !~ /not implemented/ or
  $reason = 'compiled without TCP/IP stack v4';
+ } elsif ($^O eq 'qnx') {
+ $reason = 'Not implemented';
  }
  undef $reason if $^O eq 'VMS' and $Config{d_socket};
  if ($reason) {