Change 18232 by rgs@rgs-home on 2002/12/02 19:59:07
Skip test #17 of lib/open.t when useperlio is not defined.
Affected files ...
.... //depot/perl/lib/open.t#21 edit
Differences ...
==== //depot/perl/lib/open.t#21 (text) ====
Index: perl/lib/open.t
--- perl/lib/open.t#20~18188~ Tue Nov 26 17:32:52 2002
+++ perl/lib/open.t Mon Dec 2 11:59:07 2002
@@ -171,7 +171,8 @@
"checking syswrite() output on :utf8 streams by reading it back in");
}
-{
+SKIP: {
+ skip("no perlio", 1) unless (find PerlIO::Layer 'perlio');
use open IN => ':non-existent';
eval {
require Anything;
End of Patch.
