I sometimes outsmart myself.
Jarkko Hietaniemi [Sun, 16 Dec 2001 04:21:53 +0000 (04:21 +0000)]
p4raw-id: //depot/perl@13714

lib/ExtUtils/MM_Cygwin.t
lib/ExtUtils/MM_VMS.t

index 6a718b9..17ae269 100644 (file)
@@ -11,7 +11,7 @@ BEGIN {
        if ($^O =~ /cygwin/i) {
                plan tests => 17;
        } else {
-               plan skip_all => "This is not $^O";
+               plan skip_all => "This is not cygwin";
        }
 }
 
index 759cebb..784008a 100644 (file)
@@ -14,7 +14,7 @@ BEGIN {
     # is unlikely to be installed on non VMS machines
     # (although not impossible: no xs, no sys$parse(), pure perl).
     else {
-        plan( skip_all => "This is not $^O" );
+        plan( skip_all => "This is not VMS" );
     }
 }