Change 11316 by jhi@alpha on 2001/07/12 16:37:15
Subject: [PATCH ext/IO/lib/IO/t/io_unix.t] for QNX6
From: Norton Allen <[EMAIL PROTECTED]>
Date: Thu, 12 Jul 2001 11:30:51 -0400 (edt)
Message-Id: <[EMAIL PROTECTED]>
Affected files ...
... //depot/perl/ext/IO/lib/IO/t/io_unix.t#2 edit
Differences ...
==== //depot/perl/ext/IO/lib/IO/t/io_unix.t#2 (text) ====
Index: perl/ext/IO/lib/IO/t/io_unix.t
--- perl/ext/IO/lib/IO/t/io_unix.t.~1~ Thu Jul 12 10:45:06 2001
+++ perl/ext/IO/lib/IO/t/io_unix.t Thu Jul 12 10:45:06 2001
@@ -27,7 +27,7 @@
eval {IO::Socket::pack_sockaddr_un('/tmp/foo') || 1}
or $@ !~ /not implemented/ or
$reason = 'compiled without TCP/IP stack v4';
- } elsif ($^O eq 'qnx') {
+ } elsif ($^O =~ m/^(?:qnx|nto)$/ ) {
$reason = 'Not implemented';
}
undef $reason if $^O eq 'VMS' and $Config{d_socket};
End of Patch.