RT#69616: regexp SVs lose regexpness in assignment

[p5sagit/p5-mst-13.2.git] / t / op / local.t

diff --git a/t/op/local.t b/t/op/local.t
index 211213b..db9912a 100644 (file)
--- a/t/op/local.t
+++ b/t/op/local.t
@@ -623,6 +623,7 @@ is($@, "");
 
 # RT #4342 Special local() behavior for $[
 {
+    no warnings 'deprecated';
     local $[ = 1;
     ok(1 == $[, 'lexcical scope of local $[');
     f();