EBCDIC branch was forgotten.

p4raw-id: //depot/perl@15784

diff --git a/ext/Devel/Peek/Peek.t b/ext/Devel/Peek/Peek.t
index a44e2b0..80732a4 100644 (file)
--- a/ext/Devel/Peek/Peek.t
+++ b/ext/Devel/Peek/Peek.t
@@ -347,7 +347,7 @@ do_test(19,
   RV = $ADDR
   SV = PVHV\\($ADDR\\) at $ADDR
     REFCNT = 2
-    FLAGS = \\(SHAREKEYS,UTF8\\)
+    FLAGS = \\(SHAREKEYS,HASKFLAGS\\)
     UV = 1
     NV = $FLOAT
     ARRAY = $ADDR  \\(0:7, 1:1\\)