diff options
| author | Gurusamy Sarathy <gsar@cpan.org> | 1999-05-25 04:08:50 +0000 |
|---|---|---|
| committer | Gurusamy Sarathy <gsar@cpan.org> | 1999-05-25 04:08:50 +0000 |
| commit | 43384a1a9c6320de369fa102476500bf74eac977 (patch) | |
| tree | 009ae0ec8a026a2f164dbf932f0dae27252f122f /pp_hot.c | |
| parent | ec889f3a4d67ceb8b9b54693ed4a5449d224fe29 (diff) | |
| download | perl-43384a1a9c6320de369fa102476500bf74eac977.tar.gz | |
fix glob() bug that resulted in missing symlinks that don't point
anywhere
p4raw-id: //depot/perl@3467
Diffstat (limited to 'pp_hot.c')
| -rw-r--r-- | pp_hot.c | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -1358,7 +1358,7 @@ do_readline(void) if (!isALPHA(*tmps) && !isDIGIT(*tmps) && strchr("$&*(){}[]'\";\\|?<>~`", *tmps)) break; - if (*tmps && PerlLIO_stat(SvPVX(sv), &PL_statbuf) < 0) { + if (*tmps && PerlLIO_lstat(SvPVX(sv), &PL_statbuf) < 0) { (void)POPs; /* Unmatched wildcard? Chuck it... */ continue; } |