diff options
| author | Nicholas Clark <nick@ccl4.org> | 2011-03-07 21:55:36 +0000 |
|---|---|---|
| committer | Nicholas Clark <nick@ccl4.org> | 2011-03-07 21:55:36 +0000 |
| commit | d3d1232e4b14141281f4266718249fa2750cd14e (patch) | |
| tree | 602ff745324e4f64ecade6a63bcbe50aae95c063 /t/io | |
| parent | b93d0e6249447a8bdcbd59208d8e8138756bae7c (diff) | |
| download | perl-d3d1232e4b14141281f4266718249fa2750cd14e.tar.gz | |
Refactor 4 tests to use skip_if_miniperl().
Diffstat (limited to 't/io')
| -rw-r--r-- | t/io/open.t | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/t/io/open.t b/t/io/open.t index 347bdc0ab1..57412eb7e6 100644 --- a/t/io/open.t +++ b/t/io/open.t @@ -228,8 +228,7 @@ like( $@, qr/Bad filehandle:\s+$afile/, ' right error' ); SKIP: { skip "This perl uses perlio", 1 if $Config{useperlio}; - skip "miniperl cannot be relied on to load %Errno" - if $ENV{PERL_CORE_MINITEST}; + skip_if_miniperl("miniperl can't rely on loading %Errno", 1); # Force the reference to %! to be run time by writing ! as {"!"} skip "This system doesn't understand EINVAL", 1 unless exists ${"!"}{EINVAL}; |