[PATCH] extra tests for t/op/tie.t (was RE: [perl #53482] I believe I found a bug...

[p5sagit/p5-mst-13.2.git] / t / io / crlf_through.t

diff --git a/t/io/crlf_through.t b/t/io/crlf_through.t
index 3a5522a..c080995 100644 (file)
--- a/t/io/crlf_through.t
+++ b/t/io/crlf_through.t
@@ -5,5 +5,6 @@ BEGIN {
     @INC = '../lib';
 }
 
+no warnings 'once';
 $main::use_crlf = 1;
 do './io/through.t' or die "no kid script";