diff options
author | Nick Ing-Simmons <nik@tiuk.ti.com> | 2001-03-29 09:03:43 +0000 |
---|---|---|
committer | Nick Ing-Simmons <nik@tiuk.ti.com> | 2001-03-29 09:03:43 +0000 |
commit | e0e62c2a4ed4c005b9afcfe9fe3e1838fcea785d (patch) | |
tree | 906f8f75073ef6c303cfb2958a3841862043d186 /t/io | |
parent | 561acf652e2c3e82e74118f0790fcb3211e65ad3 (diff) | |
download | perl-e0e62c2a4ed4c005b9afcfe9fe3e1838fcea785d.tar.gz |
Noticed that two tests were skipped as perlio:: package
isn't there any more. Changed the skip condition.
Avoid core-dump if sv_utf8_upgrade() called on something
that does not become SvPOK after SvPV() (e.g. a ref).
p4raw-id: //depot/perlio@9429
Diffstat (limited to 't/io')
-rwxr-xr-x | t/io/utf8.t | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/t/io/utf8.t b/t/io/utf8.t index 07e626f085..38d7007c78 100755 --- a/t/io/utf8.t +++ b/t/io/utf8.t @@ -3,7 +3,7 @@ BEGIN { chdir 't' if -d 't'; @INC = '../lib'; - unless (defined &perlio::import) { + unless (exists $open::layers{'perlio'}) { print "1..0 # Skip: not perlio\n"; exit 0; } |