From: Jarkko Hietaniemi Date: Sun, 16 Dec 2001 04:21:53 +0000 (+0000) Subject: I sometimes outsmart myself. X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=8881896e2b6c75868d2a80cf3faaa4960cc38832;p=p5sagit%2Fp5-mst-13.2.git 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 --- 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 --- 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" ); } }