summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorFather Chrysostomos <sprout@cpan.org>2014-10-04 06:31:11 -0700
committerFather Chrysostomos <sprout@cpan.org>2014-10-11 00:10:17 -0700
commit901f0970a4823fdc2f5f716238395ea1a765c12f (patch)
treeeb86151879a0440ce06e0db1e6c2e67f56ea8fd8
parent3ad7d3042169c5402b34cdc33048c5488be19f2c (diff)
downloadperl-901f0970a4823fdc2f5f716238395ea1a765c12f.tar.gz
lvref.t: Fix hash elem tests
I was testing against a package hash for the ‘lexical’ tests.
-rw-r--r--t/op/lvref.t4
1 files changed, 2 insertions, 2 deletions
diff --git a/t/op/lvref.t b/t/op/lvref.t
index 894a0b54db..e5ee655d61 100644
--- a/t/op/lvref.t
+++ b/t/op/lvref.t
@@ -133,7 +133,7 @@ is \$h{a}, \$_, '\$hash{a}';
\($h{b}) = expect_list_cx;
is \$h{b}, \$_, '\($hash{a})';
{
- my @h;
+ my %h;
\$h{a} = expect_scalar_cx;
is \$h{a}, \$_, '\$lexical_array{a}';
\($h{b}) = expect_list_cx;
@@ -151,7 +151,7 @@ is \$h{b}, \$_, '\($hash{a})';
is \$h{b}, \$_, '\local $h{a} unwound';
}
{
- my @h;
+ my %h;
\@h{"a","b"} = expect_list_cx;
is \$h{a}.\$h{b}, \$_.\$_, '\@hash{indices}';
\(@h{2,3}) = expect_list_cx;