I sometimes outsmart myself.

p4raw-id: //depot/perl@13714

diff --git a/lib/ExtUtils/MM_Cygwin.t b/lib/ExtUtils/MM_Cygwin.t
index 6a718b9..17ae269 100644 (file)
--- a/lib/ExtUtils/MM_Cygwin.t
+++ b/lib/ExtUtils/MM_Cygwin.t
@@ -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";
        }
 }
 

diff --git a/lib/ExtUtils/MM_VMS.t b/lib/ExtUtils/MM_VMS.t
index 759cebb..784008a 100644 (file)
--- a/lib/ExtUtils/MM_VMS.t
+++ b/lib/ExtUtils/MM_VMS.t
@@ -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" );
     }
 }