From: Paul Green <Paul.Green@stratus.com>
Date: Mon, 25 Mar 2002 23:57:00 +0000 (-0500)
Subject: ext/IO/lib/IO/t/io_unix.t
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=f80de530337d9be07284a92a2cf1dfb1c39c4d6d;p=p5sagit%2Fp5-mst-13.2.git

ext/IO/lib/IO/t/io_unix.t
Message-Id: <200203260457.XAA19233@mailhub2.stratus.com>

p4raw-id: //depot/perl@15509
---

diff --git a/ext/IO/lib/IO/t/io_unix.t b/ext/IO/lib/IO/t/io_unix.t
index e8ce473..60520d1 100644
--- a/ext/IO/lib/IO/t/io_unix.t
+++ b/ext/IO/lib/IO/t/io_unix.t
@@ -27,7 +27,7 @@ BEGIN {
 	    eval {IO::Socket::pack_sockaddr_un('/tmp/foo') || 1}
 	      or $@ !~ /not implemented/ or
 		$reason = 'compiled without TCP/IP stack v4';
-	} elsif ($^O =~ m/^(?:qnx|nto)$/ ) {
+	} elsif ($^O =~ m/^(?:qnx|nto|vos)$/ ) {
 	    $reason = 'Not implemented';
 	}
 	if ($reason) {