This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
De-cargo-cult.
authorJarkko Hietaniemi <jhi@iki.fi>
Sun, 31 Aug 2003 08:09:21 +0000 (08:09 +0000)
committerJarkko Hietaniemi <jhi@iki.fi>
Sun, 31 Aug 2003 08:09:21 +0000 (08:09 +0000)
p4raw-id: //depot/perl@20961

ext/DynaLoader/t/XSLoader.t
ext/SDBM_File/t/sdbm.t

index 073a6fd..bd5a52a 100644 (file)
@@ -4,7 +4,7 @@ BEGIN {
     chdir 't' if -d 't';
     @INC = '../lib';
     require Config; import Config;
-    if (($Config{'extensions'} !~ /\bSDBM_File\b/) && ($^O ne 'VMS')){
+    if ($Config{'extensions'} !~ /\bSDBM_File\b/) {
        print "1..0 # Skip: no SDBM_File\n";
        exit 0;
     }
index 3f8024e..c687bdc 100644 (file)
@@ -6,7 +6,7 @@ BEGIN {
     chdir 't' if -d 't';
     @INC = '../lib';
     require Config; import Config;
-    if (($Config{'extensions'} !~ /\bSDBM_File\b/) && ($^O ne 'VMS')){
+    if ($Config{'extensions'} !~ /\bSDBM_File\b/) {
        print "1..0 # Skip: no SDBM_File\n";
        exit 0;
     }