diff options
author | George Greer <perl@greerga.m-l.org> | 2010-07-26 23:11:42 -0400 |
---|---|---|
committer | George Greer <perl@greerga.m-l.org> | 2010-07-26 23:11:42 -0400 |
commit | 936fbabe1d1671d8f272f1745c2abfdef39067d1 (patch) | |
tree | 08d83a96d545c8aacbf714690847d67802b88250 | |
parent | 48b7c1414cfcd97ff7e31cba045fab034bee9490 (diff) | |
download | perl-936fbabe1d1671d8f272f1745c2abfdef39067d1.tar.gz |
Keep test output pretty by actually using skip_all()'s message...
-rw-r--r-- | t/porting/exec-bit.t | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/t/porting/exec-bit.t b/t/porting/exec-bit.t index 4c4bef9e60..68edf8335f 100644 --- a/t/porting/exec-bit.t +++ b/t/porting/exec-bit.t @@ -7,9 +7,8 @@ use strict; # the exe bit in the release tarball require './test.pl'; -if ($^O eq "MSWin32") { - diag( "-x on MSWin32 only indicates file has executable suffix. Try Cygwin?" ); - skip_all(); +if ( $^O eq "MSWin32" ) { + skip_all( "-x on MSWin32 only indicates file has executable suffix. Try Cygwin?" ); } plan('no_plan'); |