From: Father Chrysostomos <sprout@cpan.org>
Date: Mon, 21 May 2012 21:15:53 +0000 (-0700)
Subject: Correct Peek.t to account for flag changes
X-Git-Tag: upstream/5.20.0~6821^2
X-Git-Url: http://review.tizen.org/git/?a=commitdiff_plain;h=6acb8aa14bb7f4e2b27071708e5d28c035e99dc2;p=platform%2Fupstream%2Fperl.git

Correct Peek.t to account for flag changes
---

diff --git a/ext/Devel-Peek/t/Peek.t b/ext/Devel-Peek/t/Peek.t
index 129f29a..0a812d0 100644
--- a/ext/Devel-Peek/t/Peek.t
+++ b/ext/Devel-Peek/t/Peek.t
@@ -778,7 +778,8 @@ do_test('ENAMEs on a stash with no NAME',
   RV = $ADDR
   SV = PVHV\\($ADDR\\) at $ADDR
     REFCNT = 3
-    FLAGS = \\(OOK,SHAREKEYS\\)
+    FLAGS = \\(OOK,SHAREKEYS\\)			# $] < 5.017
+    FLAGS = \\(OOK,OVERLOAD,SHAREKEYS\\)	# $] >=5.017
     IV = 1					# $] < 5.009
     NV = $FLOAT					# $] < 5.009
     ARRAY = $ADDR