Change 20961 by [EMAIL PROTECTED] on 2003/08/31 08:09:21

        De-cargo-cult.

Affected files ...

... //depot/perl/ext/DynaLoader/t/XSLoader.t#4 edit
... //depot/perl/ext/SDBM_File/t/sdbm.t#3 edit

Differences ...

==== //depot/perl/ext/DynaLoader/t/XSLoader.t#4 (text) ====
Index: perl/ext/DynaLoader/t/XSLoader.t
--- perl/ext/DynaLoader/t/XSLoader.t#3~20952~   Sat Aug 30 08:20:48 2003
+++ perl/ext/DynaLoader/t/XSLoader.t    Sun Aug 31 01:09:21 2003
@@ -4,7 +4,7 @@
     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;
     }

==== //depot/perl/ext/SDBM_File/t/sdbm.t#3 (text) ====
Index: perl/ext/SDBM_File/t/sdbm.t
--- perl/ext/SDBM_File/t/sdbm.t#2~20945~        Fri Aug 29 22:57:04 2003
+++ perl/ext/SDBM_File/t/sdbm.t Sun Aug 31 01:09:21 2003
@@ -6,7 +6,7 @@
     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;
     }
End of Patch.

Reply via email to