Integrate mainline.

[perl5.git] / t / op / utf8decode.t

diff --git a/t/op/utf8decode.t b/t/op/utf8decode.t
index ac42b85..cd9d56a 100644 (file)
--- a/t/op/utf8decode.t
+++ b/t/op/utf8decode.t
@@ -5,6 +5,8 @@ BEGIN {
     @INC = '../lib';
 }
 
+no utf8; # this test contains raw 8-bit data on purpose; don't switch to \x{}
+
 print "1..78\n";
 
 my $test = 1;