X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Fop%2Fgv.t;h=1b705ef8097c0a0bc2b31da3457a9a6be5350e3d;hb=d47e1c27dd43d7b79216c58864a5e539f612e974;hp=e04c2cafc84975d4ffbb48234d297e982987c69e;hpb=d5114285ea0d40a354b962dd1686fb71e1d1c707;p=p5sagit%2Fp5-mst-13.2.git

diff --git a/t/op/gv.t b/t/op/gv.t
index e04c2ca..1b705ef 100644
--- a/t/op/gv.t
+++ b/t/op/gv.t
@@ -167,7 +167,10 @@ is (*{*x{GLOB}}, "*main::STDOUT");
     ok(!defined @{$a});
     ok(!defined *{$a});
 
-    ok(!defined %{$a});
+    {
+	no warnings 'deprecated';
+	ok(!defined %{$a});
+    }
     ok(!defined *{$a});
 
     ok(!defined ${$a});