Change 11348 by jhi@alpha on 2001/07/13 11:49:50

        Test the encoding transform only iff we have PerlIO,
        noticed by H. Merijn Brand.

Affected files ...

... //depot/perl/ext/PerlIO/t/encoding.t#3 edit

Differences ...

==== //depot/perl/ext/PerlIO/t/encoding.t#3 (text) ====
Index: perl/ext/PerlIO/t/encoding.t
--- perl/ext/PerlIO/t/encoding.t.~1~    Fri Jul 13 06:00:05 2001
+++ perl/ext/PerlIO/t/encoding.t        Fri Jul 13 06:00:05 2001
@@ -1,3 +1,14 @@
+#!./perl
+
+BEGIN {
+    chdir 't' if -d 't';
+    @INC = '../lib';
+    unless (find PerlIO::Layer 'perlio') {
+       print "1..0 # Skip: not perlio\n";
+       exit 0;
+    }
+}
+
 print "1..8\n";
 
 my $grk = "grk$$";
End of Patch.

Reply via email to