diff options
| author | Gurusamy Sarathy <gsar@cpan.org> | 2000-05-28 07:57:47 +0000 |
|---|---|---|
| committer | Gurusamy Sarathy <gsar@cpan.org> | 2000-05-28 07:57:47 +0000 |
| commit | 29778b0a112f48db42e9a1afb6e937e0ce9be444 (patch) | |
| tree | 930570ddbf6cb7c3e16b142bc621954f7da001f6 /ext/POSIX/POSIX.pm | |
| parent | 36bbe248096ab718da92e52c9927b81877a3d388 (diff) | |
| download | perl-29778b0a112f48db42e9a1afb6e937e0ce9be444.tar.gz | |
avoid warnings in POSIX.pm (from Barrie Slaymaker)
p4raw-id: //depot/perl@6131
Diffstat (limited to 'ext/POSIX/POSIX.pm')
| -rw-r--r-- | ext/POSIX/POSIX.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/ext/POSIX/POSIX.pm b/ext/POSIX/POSIX.pm index 9416f70809..d4d9c334b0 100644 --- a/ext/POSIX/POSIX.pm +++ b/ext/POSIX/POSIX.pm @@ -565,9 +565,9 @@ sub chmod { sub fstat { usage "fstat(fd)" if @_ != 1; local *TMP; - open(TMP, "<&$_[0]"); # Gross. + CORE::open(TMP, "<&$_[0]"); # Gross. my @l = CORE::stat(TMP); - close(TMP); + CORE::close(TMP); @l; } |