diff options
author | Nicholas Clark <nick@ccl4.org> | 2009-10-13 15:33:16 +0100 |
---|---|---|
committer | Jesse Vincent <jesse@bestpractical.com> | 2009-10-16 12:30:16 -0400 |
commit | 140d27a472ded936ea3bf0616e64be64bc105edd (patch) | |
tree | 4025d6b027616234da2f04e024c8c58224eded92 /t | |
parent | 4521bb0671e9410465c861eb64d36b312a967b53 (diff) | |
download | perl-140d27a472ded936ea3bf0616e64be64bc105edd.tar.gz |
defined @array and defined %hash need no warnings 'deprecated';
Diffstat (limited to 't')
-rw-r--r-- | t/op/undef.t | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/t/op/undef.t b/t/op/undef.t index 8bfecab9e4..7afaf9cc93 100644 --- a/t/op/undef.t +++ b/t/op/undef.t @@ -72,6 +72,7 @@ like $@, qr/^Modification of a read/; { require Tie::Hash; tie my %foo, 'Tie::StdHash'; + no warnings 'deprecated'; ok defined %foo; %foo = ( a => 1 ); ok defined %foo; @@ -80,6 +81,7 @@ like $@, qr/^Modification of a read/; { require Tie::Array; tie my @foo, 'Tie::StdArray'; + no warnings 'deprecated'; ok defined @foo; @foo = ( a => 1 ); ok defined @foo; |