diff options
| author | Craig A. Berry <craigberry@mac.com> | 2001-11-18 08:33:48 -0600 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2001-11-19 13:50:45 +0000 |
| commit | 1d2b156ae906ef7a9a997cd88768c12dec800b98 (patch) | |
| tree | 8a51f2c0efc9c8e478e770a67fa3b55eda0c134e | |
| parent | 6aa71d6ea27a640886ba2dcf7250d1be73560df8 (diff) | |
| download | perl-1d2b156ae906ef7a9a997cd88768c12dec800b98.tar.gz | |
io_poll.t vms/test.com tweaks
Message-Id: <a05101001b81db38899ea@[172.16.52.1]>
p4raw-id: //depot/perl@13091
| -rwxr-xr-x | ext/IO/lib/IO/t/io_poll.t | 2 | ||||
| -rw-r--r-- | vms/test.com | 2 |
2 files changed, 2 insertions, 2 deletions
diff --git a/ext/IO/lib/IO/t/io_poll.t b/ext/IO/lib/IO/t/io_poll.t index d31ea47f53..8d157b5e6e 100755 --- a/ext/IO/lib/IO/t/io_poll.t +++ b/ext/IO/lib/IO/t/io_poll.t @@ -39,7 +39,7 @@ print "ok 2\n"; $poll->poll(0.1); -if ($^O eq 'MSWin32' || $^O eq 'NetWare') { +if ($^O eq 'MSWin32' || $^O eq 'NetWare' || $^O eq 'VMS') { print "ok 3 # skipped, doesn't work on non-socket fds\n"; print "ok 4 # skipped, doesn't work on non-socket fds\n"; } diff --git a/vms/test.com b/vms/test.com index a7064a9bd3..b7e5eea3b8 100644 --- a/vms/test.com +++ b/vms/test.com @@ -115,7 +115,7 @@ use Config; use File::Spec; @compexcl=('cpp.t'); -@opexcl=('die_exit.t','exec.t','magic.t','stat.t'); +@opexcl=('die_exit.t','exec.t','stat.t'); @exclist=(@compexcl,@libexcl,@opexcl); foreach $file (@exclist) { $skip{$file}++; } |