Change 18821 by [EMAIL PROTECTED] on 2003/03/04 04:58:36
Can't test this without PerlIO.
Affected files ...
... //depot/perl/t/uni/write.t#2 edit
Differences ...
==== //depot/perl/t/uni/write.t#2 (text) ====
Index: perl/t/uni/write.t
--- perl/t/uni/write.t#1~18794~ Sat Mar 1 23:21:36 2003
+++ perl/t/uni/write.t Mon Mar 3 20:58:36 2003
@@ -5,6 +5,10 @@
chdir 't' if -d 't';
@INC = qw(../lib .);
require "test.pl";
+ unless (PerlIO::Layer->find('perlio')){
+ print "1..0 # Skip: PerlIO required\n";
+ exit 0;
+ }
}
plan tests => 6;
End of Patch.