diff options
| author | Jarkko Hietaniemi <jhi@iki.fi> | 2003-08-12 09:57:07 +0000 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2003-08-12 09:57:07 +0000 |
| commit | f94751daa2b06939cc261db105ffe13f428d4b77 (patch) | |
| tree | 8f52a0e49f22f1fdc1cc67a4d5ab0d7db16e4fcc /ext/Safe | |
| parent | d7f44de216e72597099819403690905e87b0a15f (diff) | |
| download | perl-f94751daa2b06939cc261db105ffe13f428d4b77.tar.gz | |
No dor in maint.
p4raw-id: //depot/perl@20639
Diffstat (limited to 'ext/Safe')
| -rw-r--r-- | ext/Safe/t/safeops.t | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/ext/Safe/t/safeops.t b/ext/Safe/t/safeops.t index 285e97814d..525ee97f62 100644 --- a/ext/Safe/t/safeops.t +++ b/ext/Safe/t/safeops.t @@ -41,6 +41,7 @@ close $fh; sub testop { my ($op, $opname, $code) = @_; pass("$op : skipped") and return if $code =~ /^SKIP/; + pass("$op : skipped") if $code =~ m://: && $] < 5.009; my $c = new Safe; $c->deny_only($op); $c->reval($code); |