diff options
author | Nicholas Clark <nick@ccl4.org> | 2012-01-17 13:29:56 +0100 |
---|---|---|
committer | Nicholas Clark <nick@ccl4.org> | 2012-01-17 13:29:56 +0100 |
commit | 33f89799d9328f3d175aa913900d16794119e284 (patch) | |
tree | f0d8ebd235826e0778327aa9e1d51b50c3eea8d9 /t/op/gv.t | |
parent | ef8156f500dbf5c96a21512c58184fbca79bcfb7 (diff) | |
download | perl-33f89799d9328f3d175aa913900d16794119e284.tar.gz |
Avoid 'defined(@array) is deprecated' warnings in tests.
Commit 604a99bd464c92d7 enabled the warning for package arrays, but failed
to lexically disable the warning for the various tests for the construction.
Even though the construction is deprecated, we'd still like to know if the
behaviour changes, in case it wasn't intentional.
Diffstat (limited to 't/op/gv.t')
-rw-r--r-- | t/op/gv.t | 5 |
1 files changed, 4 insertions, 1 deletions
@@ -192,7 +192,10 @@ is (*{*x{GLOB}}, "*main::STDOUT"); my $a = "SYM000"; ok(!defined *{$a}); - ok(!defined @{$a}); + { + no warnings 'deprecated'; + ok(!defined @{$a}); + } ok(!defined *{$a}); { |