X-Git-Url: http://git.vpit.fr/?p=perl%2Fmodules%2FSub-Nary.git;a=blobdiff_plain;f=t%2F23-branch.t;fp=t%2F23-branch.t;h=fef709dc1da61c42bddf566e42d0ca974b4c924e;hp=ae0456481a2b47101b47793e18ca1b55c9909c64;hb=790ba71f0305951a6d7bb04ca02a1dad7563f439;hpb=37cafd97ccbd41d9cde225a53f6a058ac23ce7d5 diff --git a/t/23-branch.t b/t/23-branch.t index ae04564..fef709d 100644 --- a/t/23-branch.t +++ b/t/23-branch.t @@ -40,7 +40,7 @@ sub ret1234 { } elsif ($h{foo}) { return 3, @a[4, 5]; } elsif (@a) { - return @h{qw/a b c/}, $y + return @h{qw}, $y } }