diff options
| author | Dave Mitchell <davem@fdisolutions.com> | 2005-05-07 12:57:06 +0000 |
|---|---|---|
| committer | Dave Mitchell <davem@fdisolutions.com> | 2005-05-07 12:57:06 +0000 |
| commit | a034e688aeb372632feafc428b392a22393dec55 (patch) | |
| tree | 00edd69325fa45e86f3a3a37b5ef01820d454559 /lib/unicore | |
| parent | 5203fbcae61b42c66ba138a48162ecc0880db2c9 (diff) | |
| download | perl-a034e688aeb372632feafc428b392a22393dec55.tar.gz | |
while (my $x ...) { ...; redo } shouldn't undef $x.
In the presence of 'my' in the conditional of a while(), until(),
or for(;;) loop, add an extra scope to the body so that redo
doesn't undef the lexical
p4raw-id: //depot/perl@24412
Diffstat (limited to 'lib/unicore')
0 files changed, 0 insertions, 0 deletions