Update name of %Config value under VMS
Perl 5 Porters [Mon, 17 Jun 1996 06:22:51 +0000 (06:22 +0000)]
t/lib/socket.t

index afc2a5b..1e1027e 100755 (executable)
@@ -5,7 +5,7 @@ BEGIN {
     @INC = '../lib' if -d '../lib';
     require Config; import Config;
     if ($Config{'extensions'} !~ /\bSocket\b/ && 
-        !(($^O eq 'VMS') && $Config{d_has_socket})) {
+        !(($^O eq 'VMS') && $Config{d_socket})) {
        print "1..0\n";
        exit 0;
     }