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.

Reply via email to