X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Fio%2Fcrlf.t;h=0968b3653d84f9934e1ad2c7a52cba9d945a9047;hb=6b5da1a3dd326d0fe0f59ec1ea7b9b5d72b2a49e;hp=20d278fbf29d2ab991a73feb88bf3e75d32d3ab1;hpb=24f59afc531955e5c3768c6023fb2ac247d6939d;p=p5sagit%2Fp5-mst-13.2.git

diff --git a/t/io/crlf.t b/t/io/crlf.t
index 20d278f..0968b36 100644
--- a/t/io/crlf.t
+++ b/t/io/crlf.t
@@ -14,7 +14,7 @@ END {
  unlink($file);
 }
 
-if ($Config{useperlio}) {
+if (find PerlIO::Layer 'perlio') {
  plan(tests => 6);
  ok(open(FOO,">:crlf",$file));
  ok(print FOO 'a'.((('a' x 14).qq{\n}) x 2000) || close(FOO));