We do not want to see the utf8 hints bit.

p4raw-id: //depot/perl@16748

diff --git a/lib/vmsish.t b/lib/vmsish.t
index 03fdd60..24e3b04 100644 (file)
--- a/lib/vmsish.t
+++ b/lib/vmsish.t
@@ -13,6 +13,8 @@ plan(tests => 25);
 SKIP: {
     skip("tests for non-VMS only", 1) if $^O eq 'VMS';
 
+    no utf8;
+
     BEGIN { $Orig_Bits = $^H }
 
     # make sure that all those 'use vmsish' calls didn't do anything.