X-Git-Url: http://git.vpit.fr/?p=perl%2Fmodules%2FSub-Nary.git;a=blobdiff_plain;f=t%2F21-list.t;fp=t%2F21-list.t;h=7fa217bc8c5673ec3ed40b402298c36be741f9b7;hp=4dc492a811480b81dfa01965b9d46b23d8591047;hb=790ba71f0305951a6d7bb04ca02a1dad7563f439;hpb=37cafd97ccbd41d9cde225a53f6a058ac23ce7d5 diff --git a/t/21-list.t b/t/21-list.t index 4dc492a..7fa217b 100644 --- a/t/21-list.t +++ b/t/21-list.t @@ -33,7 +33,7 @@ my @tests = ( [ sub { %h }, 'list' ], [ sub { $h{a} }, 1 ], - [ sub { @h{qw/a b/} }, 2 ], + [ sub { @h{qw} }, 2 ], [ sub { keys %h }, 'list' ], [ sub { values %h }, 'list' ],