X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Flib%2Fio_multihomed.t;h=55030b5ad105111b6db5cbc64838fe47f7b04b59;hb=6b14153558e53fc6fe6e32088f3a22cb391d2206;hp=8dc46e96b427403b35c49e4d9e3cc0703d2160f8;hpb=45c0de28763808112fd2f46ea311b6bb0c6050b3;p=p5sagit%2Fp5-mst-13.2.git

diff --git a/t/lib/io_multihomed.t b/t/lib/io_multihomed.t
index 8dc46e9..55030b5 100644
--- a/t/lib/io_multihomed.t
+++ b/t/lib/io_multihomed.t
@@ -3,7 +3,7 @@
 BEGIN {
     unless(grep /blib/, @INC) {
 	chdir 't' if -d 't';
-	unshift @INC, '../lib' if -d '../lib';
+	@INC = '../lib';
     }
 }
 
@@ -21,7 +21,6 @@ BEGIN {
 	elsif ($Config{'extensions'} !~ /\bIO\b/) {
 	    $reason = 'IO extension unavailable';
 	}
-	undef $reason if $^O eq 'VMS' and $Config{d_socket};
 	if ($reason) {
 	    print "1..0 # Skip: $reason\n";
 	    exit 0;